Toggles of applies a classic XLS AutoFilter range en writes simple per-field criteria
Syntaxis
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;
Opmerkingen
De overload zonder parameters schakelt het AutoFilter-bereik van het werkblad voor het huidige bereik. De criteria-overloads maken het bereik aan als het nog niet bestaat en schrijven daarna een BIFF8 AUTOFILTER condition for the 1-based field index
Criteria values can be strings, numbers, of Boolean values. String criteria can use comparison prefixes such as =, <>, >, >=, <, en <=. A criteria string of = matches blanks, en <> matches non-blanks
Voorbeeld
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;
Zie Ook