Bir Sütundaki Aynı Rakamların Sayısını Bulmak...

[mehmetuca]

Bir sütundaki bir çok sayının içinden istediğimiz bir rakamın mesela 9 rakamının toplam sayısını nasıl bulabiliriz. Örnek Aşağıdadır. teşekkürler.

 

[Metin Karaağaç]

Hangi 9 rakamının?
Neredeki 9 rakamının?

 

[mehmetuca]

Örnek

Mesela A1 ile A100 arasında 101 den 199 kadar sayılar olsun. ben bu hücreler içindeki 9 ları saymak istiyorum. Teşekkürler.

 

[Metin Karaağaç]

A sütununu seçip, Veri/metni sütunlara dönüştür diyoruz.
Sabit genişlikli diyoruz ve fare ile üç basamaklı sayları tek tek ayırıyoruz.
İleri diyoruz ve son diyoruz.
Daha sonra D4 hücresine =eğersay(A:C;9) yazıyoruz.
Sonuç 280

 

[mehmetuca]

Tşk.

Abi Çok Tşk. Ama Daha basit bir yolu yok mu yani sayıları ayırmadan yapamaz mıyız. Çok tşk.

 

[Metin Karaağaç]

Vardır belki ama ben bilmiyorum.

 

[Skorpiyon]

Sayın meranyar,

Aşağıdaki örneği inceleyiniz.

Kodlar,
Private Sub CommandButton1_Click()
For a = 1 To [A65536].End(xlUp).Row
For b = 1 To Len(Cells(a, 1))
If Val(Mid(Cells(a, 1), b, 1)) = Val(TextBox1) Then c = c + 1
Next b
Next a
Label1.Caption = TextBox1 & " sayısından " & c & " adet vardır."
End Sub

Not : Tek basamaklı sayılar için düzenlenmiştir.

Dosya,

 

[Ergün Güler]

Sayın meranyar,

Aşağıdaki örneği inceleyiniz.

Kodlar,
Private Sub CommandButton1_Click()
For a = 1 To [A65536].End(xlUp).Row
For b = 1 To Len(Cells(a, 1))
If Val(Mid(Cells(a, 1), b, 1)) = Val(TextBox1) Then c = c + 1
Next b
Next a
Label1.Caption = TextBox1 & " sayısından " & c & " adet vardır."
End Sub

Not : Tek basamaklı sayılar için düzenlenmiştir.

Dosya,

Sayın Şaban Sertkaya,
harika bir çalışma. Teşekkürler.

 

[Skorpiyon]

Teşekkürler ergunguler76@

Beğenmenize sevindim.