bağ_değ_say makro yazımı

[Muhammet Okumuş]

Arkadaşlar merhaba
Sayfa2 deki b2:b200 aralığındaki sayı adedini sayfa1'in b3 hücresine yazan makro nasıl olur. Düğme sayfa1 de olacak. fonksiyonlu yaptım ama bana makrosu lazım.

 

[leumruk]

Merhaba,
Kendinize uyarlayın:

Say = WorksheetFunction.Count(Sheets("Sayfa2").Range("b2:b200"))
MsgBox Say

 

[Mahir64]

Merhaba Altarnatif olarak

Sub CountA()
[E1] = Evaluate("=CountA(sayfa2!B2:B200)")
End Sub

 

[Muhammet Okumuş]

Teşekkür ederim sn leumruk ve sn Mahir.

 

[Mahir64]

Teşekkür ederim sn leumruk ve sn Mahir.

İyi çalışmalar :hey: