TextBox Change Olayı ile aramada sayısal veri sorunu

[antonio]

Arkadaşlar herkese kolay gelsin.
Durumun daha iyi anlaşılması için örnek bir dosya ekliyorum. TextBox Change olayı ile arama yaparken metinsel aramalarda hiç bir sorun yok ama nedense sayısal verilerle aynı şey yapılamıyor. Benim uyguladığım kod şu şekilde:

Private Sub TextBox2_Change()
On Error Resume Next
If TextBox2.Value = "" Then Sheets("Sayfa1").AutoFilterMode = False
    Sheets("Sayfa1").Range("A1:B1").AutoFilter field:=2, _
Criteria1:="*" & TextBox2.Value & "*"
End Sub

Şimdiden teşekkürler..

 

[antonio]

Gerek site üzerinde, gerekse web üzerinde yaptığım araştırmalarda bu soruya cevap bulamadım.

 

[Orion1]

textbox2 yi aşağıdaki gibi kullanınız.
içerir ve başlar şeklinde kullanım için değerin string olması lazımdır.
Sayısal değerler için içerir ve başlar şeklinde arama yapamazsınız.

 Sheets("Sayfa1").Range("A1:B1").AutoFilter field:=2, Criteria1:=TextBox2.Value

 

[antonio]

textbox2 yi aşağıdaki gibi kullanınız.
içerir ve başlar şeklinde kullanım için değerin string olması lazımdır.
Sayısal değerler için içerir ve başlar şeklinde arama yapamazsınız.

 Sheets("Sayfa1").Range("A1:B1").AutoFilter field:=2, Criteria1:=TextBox2.Value

Evren Bey öncelikle cevabınız için çok teşekkür ederim.
Sayısal değerler içinde başlar veya içerir türü bir arama yapabilmem için nasıl bir yöntem uygulayabilirim? Özellikle telefon numaraları için gerekiyor? Örneğin textbox2 yi kaldırıp yerine sayfanın change olayını kullansak ve aramayı B1 hücresinde yapsak bir şey değişir mi? Sizin öneriniz nedir?

 

[Korhan Ayhan]

Merhaba,

Excelde normalde sayısal veri içeren bir sütuna filtre uygularsanız Evren beyin bahsettiği olayı görürsünüz. Sayısal verilerde "eşittir" seçeneği sonuç vermektedir.

Sayısal verileri ısrarla süzmek istiyorum derseniz, dolaylı yoldan çözüm önerebilirim.

C2 hücresine aşağıdaki formülü uygulayın ve alt satırlara sürükleyin.

=TEMİZ(B2)

Bu formülle telefon numaraları metinsel ifadeye dönüşecektir.

Bu alanı kopyalayın ve B2 hücresinden itibaren DEĞER olarak yapıştırın. B sütununu biraz genişletirseniz verileri sola yanaşık durduğunu göreceksiniz. Artık istediğiniz gibi süzebilirsiniz.

C sütununu silebilirsiniz...

Ayrıca verilerinizin orjinal halini bozmadan döngü yöntemi ile verileri süzebilirsiniz. Çok veriniz yoksa döngü yöntemide hızlı sonuç verecektir.

 

[antonio]

Korhan hocam sağolun. Sayenizde bu formülü de öğrenmiş oldum. Denedim, gerçekten metinsel öğelermiş gibi başlayan ve içeren sayıları filtreliyor. Genelde hücrelere yazdığımız her formülün, makro ile ifade edilen bir karşılığı da vardır. Bu "TEMİZ()" formülünün de makro ile yazılabilecek bir karşılığı var mıdır?

 

[Korhan Ayhan]

Yanılmıyorsam "CLEAN" olmalı...