Belirlenen Sayısal değerleri içeren hücreleri bulmak

[tamer42]

Merhabalar
Aşağıdaki kod yapısıyla bir hücrede belli bir metini içeren string değerleri aratabiliyoruz.

benim sormak istediğim bu şekilde nümerik değerleri aratmak mümkün müdür? arama yapılan hücrede kple nümeri. yada nasıl bir yol önerebilirsiniz.

Örnek: Hücrede "0" içeren sayıları bul. 101, 43023, 6070 gibi....

If Sayfa1.Range("K2").Value Like  "*R*" Then
...............................
............................
End If

teşekkürler,
iyi çalışmalar.

 

[ÖmerFaruk]

Tamer Bey, aratacağınız verileri içeren örnek bir excel paylaşabilirmisin.

 

[tacettinsal]

Merhaba,

anladığım kadarıyla hücre içerisinde virgül ile ayrılmış rakamlar mevcut.101, 43023, 6070 gibi..

hücre içeriğini önce virgül ile ayırıp diziye dönüştürüp bu diziler arasında aratma yapılabilir.

aşağıdaki kodu uygular mısınız...

Sub sifir_arama()
Dim numbers As String
Dim numberarray As Variant

numbers = Sheets("kendi çalışma sayfanız").Range("aratmak istediğiniz hedef hücre")

numberarray = Split(numbers, ",")

For i = LBound(numberarray) To UBound(numberarray)
    If numberarray(i) Like "*0*" Then
    Debug.Print numberarray(i) 'bulduğunuz değerleri nerede kullanacağınıza göre değiştirilebilir.
    End If
Next i

End Sub

 

[Korhan Ayhan]

R harfi yerine 0 yazıp denediniz mi?

"*R*"

 

[tamer42]

R harfi yerine 0 yazıp denediniz mi?

"*R*"

Korhan hocam bu şekilde olacağını hiç düşünmemiştim, demek ki bazen basit düşünmek gerekiyor.

 

[Korhan Ayhan]

En güzel öğrenme yöntemi korkmadan deneme yapmaktır.