Klasik bir XLS AutoFilter aralığı ayarlar ve tek çağrıda alan başına bir ölçüt uygular
Sözdizimi
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;
Açıklamalar
String overload, A1:C5 gibi A1 gösterimli bir aralık kabul eder. Sayısal aşırı yükleme 1 tabanlı satır ve sütun dizinlerini kullanır. Field, AutoFilter aralığı içinde 1 tabanlıdır
ApplyAutoFilter, mevcut herhangi bir çalışma sayfası düzeyi AutoFilter aralığını verilen aralıkla değiştirir, ardından IXLSRange.Autofilter'ın kullandığı aynı BIFF8 alan ölçütü kayıtlarını yazar
Karşılaştırma operatörüyle (>=, <=, <>, >, < veya =) başlayıp arkasından bir sayı gelen metin ölçütü — örneğin '>=100' veya '=2.5' — sayı koşulu olarak saklanır; böylece sayısal hücrelerle tam olarak Excel'deki gibi eşleşir. Sayıyı ondalık ayırıcı olarak nokta ile yazın. Bunun dışındaki her metin, '100' gibi çıplak bir değer dahil, metin koşulu olarak saklanır
Klasik bir XLS AutoFilter uygulandıktan veya okunduktan sonra saklanan alan başına ölçütleri incelemek için TXLSWorksheet.AutoFilterColumns.Find(Field) kullanın
Örnek
Workbook := TXLSWorkbook.Create;
try
Sheet := Workbook.Sheets[1];
Sheet.ApplyAutoFilter('A1:C5', 2, '>=100');
Workbook.SaveAs('filtered.xls', xlExcel97);
finally
Workbook.Free;
end;
See Also