Tarih: 22/04/2022

VBA Tablolarda Filtre Kriteri Olarak Dizi Kullanma

Tablolarda filtre kriteri olarak dizi kullanma……

Sub LISTELE()
 
Dim ws1 As Worksheet
Dim ws2 As Worksheet
Dim son As Integer
Dim dizi() As String
 
Set ws1 = Sheets("Sayfa1")
Set ws2 = Sheets("Sayfa2")
 
son = ws1.Cells(Rows.Count, 9).End(xlUp).Row
 
ReDim dizi(son - 2)
 
For i = 2 To son
 
dizi(i - 2) = ws1.Range("I" & i)
 
Next
 
ActiveSheet.ListObjects("Sorgu1").Range.AutoFilter Field:=2, Criteria1:=dizi, Operator:=xlFilterValues
 
End Sub

Kolay gele…

Excel VBA

ArrayCriteria

VBA Tablolarda Filtre Kriteri Olarak Dizi Kullanma

İlk Yorumu Siz Yapın

Bir yanıt yazın Yanıtı iptal et