HotXLS Docs

Autofilter 方法

切换或应用经典 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;

请参阅