Merhaba,
ActiveSheet.Range("$A$6:$R$65000").AutoFilter Field:=1, Criteria1:= _
"E621AU0003"
Yukarda grlen filtre kodundaki criteria1 ksmnda yazan E621AU0003 yerine bir hcrede ki deeri otomatik okumasn istiyorum bunun iin nasl bir kod yazabilirim.
Merhaba,
ActiveSheet.Range("$A$6:$R$65000").AutoFilter Field:=1, Criteria1:= _
"E621AU0003"
Yukarda grlen filtre kodundaki criteria1 ksmnda yazan E621AU0003 yerine bir hcrede ki deeri otomatik okumasn istiyorum bunun iin nasl bir kod yazabilirim.
bu iinizi grr sanrmKod:Worksheets("veri").Range("a1").AutoFilter Field:=2, Criteria1:="=" & Range("k1").Value
Teekkrler
u anda 1 yemiz bu konuya gz atyor. (0 kaytl ye ve 1 misafir.)
Yetkileriniz
Alnt ile Cevapla