Przełącza lub stosuje klasyczny zakres AutoFilter XLS i zapisuje proste kryteria dla poszczególnych pól
Składnia
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;
Uwagi
Przeciążenie bez parametrów przełącza zakres AutoFilter arkusza dla bieżącego zakresu. Przeciążenia kryteriów tworzą zakres, jeśli nie jest jeszcze zdefiniowany, a następnie zapisują warunek BIFF8 AUTOFILTER dla indeksu pola opartego na 1
Wartości kryteriów mogą być ciągami znaków, liczbami lub wartościami logicznymi. Kryteria tekstowe mogą używać prefiksów porównania, takich jak =, <>, >, >=, < i <=. Kryterium tekstowe = pasuje do pustych komórek, a <> pasuje do niepustych
Opis
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;
Zobacz też