切換或套用傳統 XLS 自動篩選範圍,並寫入每個欄位的簡單準則
語法
procedure Autofilter; overload;
procedure Autofilter(Field: Integer; Criteria1: Variant); overload;
procedure Autofilter(Field: Integer; Criteria1: Variant; VisibleDropDown: Boolean); overload;
procedure Autofilter(Field: Integer; Criteria1: Variant; Operator: XlAutoFilterOperator; Criteria2: Variant); overload;
procedure Autofilter(Field: Integer; Criteria1: Variant; Operator: XlAutoFilterOperator; Criteria2: Variant; VisibleDropDown: Boolean); overload;
備註
無參數的多載為目前範圍切換工作表自動篩選範圍。有準則的多載會在範圍尚未定義時建立它,然後為 1 起始的欄位索引寫入 BIFF8 AUTOFILTER 條件
準則值可以是字串、數字或布林值。字串準則可使用比較前置詞,例如 =、<>、>、>=、< 和 <=。準則字串 = 比對空白,而 <> 比對非空白
範例
Workbook := TXLSWorkbook.Create;
try
Sheet := Workbook.Sheets[1];
Sheet.Range['A1', 'C10'].Autofilter(1, 'Open');
Sheet.Range['A1', 'C10'].Autofilter(3, '>=100');
Workbook.SaveAs('filtered.xls', xlExcel97);
finally
Workbook.Free;
end;
另請參閱