Встановлює класичний діапазон XLS AutoFilter та застосовує критерій для окремого поля за один виклик
Синтаксис
procedure ApplyAutoFilter(ARange: WideString; Field: Integer; Criteria1: Variant); overload;
procedure ApplyAutoFilter(ARange: WideString; Field: Integer; Criteria1: Variant; Operator: XlAutoFilterOperator; Criteria2: Variant); overload;
procedure ApplyAutoFilter(ARow1, ACol1, ARow2, ACol2: Integer; Field: Integer; Criteria1: Variant); overload;
procedure ApplyAutoFilter(ARow1, ACol1, ARow2, ACol2: Integer; Field: Integer; Criteria1: Variant; Operator: XlAutoFilterOperator; Criteria2: Variant); overload;
Примітки
Рядкове перевантаження приймає діапазон у стилі A1, наприклад A1:C5. Числове перевантаження використовує індекси рядків та стовпців з відліком від 1. Field також має відлік від 1 у межах діапазону AutoFilter
ApplyAutoFilter замінює будь-який існуючий діапазон AutoFilter аркуша наданим діапазоном, а потім записує ті самі записи критеріїв поля BIFF8, що використовуються IXLSRange.Autofilter
Використовуйте TXLSWorksheet.AutoFilterColumns для перегляду збережених критеріїв окремих полів після застосування або читання класичного XLS AutoFilter
Приклад
Workbook := TXLSWorkbook.Create;
try
Sheet := Workbook.Sheets[1];
Sheet.ApplyAutoFilter('A1:C5', 2, '>=100');
Workbook.SaveAs('filtered.xls', xlExcel97);
finally
Workbook.Free;
end;
Дивіться також