Excel Formül Ekleme

[Ali Excel Öğreniyor]

Merhabalar Excelde yeni yeni VBA öğrenmeye çalışıyorum.

Yapmak istediğim şey şu:
Bir stok giriş ve çıkış modülümüz var ve ben bu modüle stokta kayıtlı olan toplam ürünlerin sayısını eklemek istiyorum.
Formül olarak =EĞER(ÇOKEĞERSAY(A:A;">0";B:B;"")>150;"DOLU";"ORTA")
Bu formülü yazdım fakat bu formülün sonucunu modülde nasıl göstereceğimi bilmiyorum.

Modül benim bilgisayarımda kayıtlı olmadığı için buraya ekliyemiyorum.

Şimdiden Teşekkürler.

 

[Muzaffer Ali]

Merhaba.

IIf(WorksheetFunction.CountIfs(Range("A:A"), ">0", Range("B:B"), "") > 150, "DOLU", "ORTA")