textbox'a formül ekleme hk

[Faulkner]

Merhaba Arkadaşlar,

Ekteki resimde bulunan, excel çalışmamdan bir bölümdür.

Ben burada textbox kutuçuğuna düşeyara förmülünü buradan çalıştırmak istiyorum.

Aşağıdaki vba ekranında textbox da düşey ara formülünü nasıl yapılır.

Private Sub TextBox1_Change()
 Range("B3").AutoFilter Field:=1, Criteria1:="*" + TextBox1.Text + "*", _
           Operator:=xlAnd
End Sub

 

[askm]

Örnek dosyanızla yapmak istediğiniz işlemi, formülü buraya eklemek şeklinde değil de sonuçta ne yapmasını istediğinizi yazarsanız yardımcı olmaya çalışalım.

 

[Faulkner]

üstad

Ben dosyamda normalde filtre ile kullanarak işimi çözüyordum. bu textbox ile fitlrelemeyi görünce çalışma sayfamda denedim. ve yukardaki code ile çalıştırdım. textbox a elle yazdığımda normal filtre kullanmadan karşıma çıkıyor. Sonra dedim textbox elle yazacağıma düşeyara formulünü buraya işliyeyim denedim fakat yapamadım.

saygılarımla