Přepíná nebo aplikuje rozsah AutoFiltru klasického XLS a zapisuje jednoduché kritéria pro jednotlivá pole
Syntaxe
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;
Poznámky
Přetížení bez parametrů přepíná rozsah AutoFiltru listu pro aktuální rozsah. Přetížení s kritérii vytvoří rozsah, pokud ještě není definován, a poté zapíše podmínku BIFF8 AUTOFILTER pro index pole začínající od 1
Hodnoty kritérií mohou být řetězce, čísla nebo logické hodnoty. Řetězcová kritéria mohou používat předpony porovnání jako =, <>, >, >=, < a <=. Řetězcové kritérium = odpovídá prázdným buňkám a <> odpovídá neprázdným buňkám
Příklad
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;
Viz také