Süzme makrosu

[atillaciftci]

Aşağıda ATİLLA ÇİFTÇİ gözüken yere KALAN İZİN SORGULA Sayfasının A3 Hücresinde yazanı sorgulasın istiyorum A3 hücresinde formül var ve o formülün şartına göre değişiyor.

ActiveSheet.ListObjects("Tablo1").Range.AutoFilter Field:=21, Criteria1:= _
"=*ATİLLA ÇİFTÇİ*", Operator:=xlAnd

 

[Necdet]

Merhaba,

Criteria1:= "=*" & Sheets("KALAN İZİN SORGULA").Range("A3")

 

[atillaciftci]

Çalıştı teşekkürler...

 

[Necdet]

Çalıştı teşekkürler...

Güle güle kullanınız.