Makro vba

[yusufcam]

Merhaba Bir excel çalışma sayfasında 16 sütun da aynı sayı dan 5 tane var ( Aynı Kişi Diyelim ) bunu saydırmak için Viusal Basic de nasıl bir kod yazmalıyım.

 

[Murat OSMA]

Merhaba,

Aklınızda bulunsun; Merhaba yazarken kısaltma yapmanız (Mrb.) samimiyetsiz bir görüntü ortaya koyar, ona dikkat edelim lütfen.


Bu kod size için yeterli olacaktır. Tüm hücrelerde Emre isminden kaç adet olduğunu verir.

[SIZE="2"]Sub Emre()
    MsgBox WorksheetFunction.CountIf(Cells, "[COLOR="Red"]Emre[/COLOR]")
End Sub[/SIZE]

 

[yusufcam]

Uyarınız için teşekkür ederim. ayrıca kod içinde

 

[yusufcam]

Göndermiş olduğunuz kodu, excel hücresine kaç taneyse yazmaz mı

Örnek bir excel çalışma sayfasında 10 tane "emre" var bunun da başka bir excel çalışma kitabında icmali var icmal çalışma sayfasında emreden kaç tane olduğunu karşısına yazar mı teşekkürler

 

[Ömer BARAN]

Merhaba, Sayın OSMA çevrimiçi değil.
Aslında kendiniz de yapabilirdiniz diye düşünüyorum.

Hallettim şeklinde bir cevap yazmadığınıza göre; sorunuzu ben cevaplayayım
.

[COLOR="Red"]Sheets("SAYFAADI").[A1][B]=[/B][/COLOR][COLOR="Blue"]WorksheetFunction.CountIf(Cells, "SAYIMIYAPILANDEĞER")[/COLOR]