Sütünda sayı sayma

[Mustafa Kabdağlı]

Merhabalar,

Forumda araştırdım ancak uygun örnek bulamadım. Yapmak istediğim sayfa1'in A sütünunda aynı sayıların adedini saymak. Form üzerinde Command1 butonuna basıldığında, TextBox1'e yazılan sayıyı A sütünunda kaç adet oduğunu TextBox2'e yazdırmak.

Şimdiden teşekkürler.

 

[ÖmerBey]

Merhaba aşağıdaki kodu kullanabilirsiniz...

Private Sub CommandButton1_Click()
TextBox2 = WorksheetFunction.CountIf(Sheets("Sayfa1").Range("A:A"), TextBox1)
End Sub

 

[Mustafa Kabdağlı]

Çok teşekkürler mucit77