Listboxtaki aynı olan verileri saymak

[enes2000eren]

Slm.arkadaşlar.forumda aradım ama bir türlü bulamadım.listboxta f sütunundaki erkekleri veya bayanları texboxa nasıl saydırabilirim

 

[enes2000eren]

Yardımlarınız için tşk

 

[Orion1]

Slm.arkadaşlar.forumda aradım ama bir türlü bulamadım.listboxta f sütunundaki erkekleri veya bayanları texboxa nasıl saydırabilirim

textbox1.text=worksheetfunction.countif(range("F:F"),"Erkek")

 

[enes2000eren]

tşk.evren bey kırmızı olan bölüm ilçemem sayfasında ve ap1 hücresinde yazılı ise onu nasıl saydırabilirim.Sheets("İLÇEMEM").Range("AP1").Value şeklinde denedim bir sonuç alamadım.

ÜCRETLİ.Text = WorksheetFunction.CountIf(Range("G:G"), "Ücretli")

 

[enes2000eren]

sorumu düzeltiyorum.evren bey kırmızı olan bölüm ilçemem sayfasında ve ap1 hücresinde yazılı ise onu listboxta nasıl saydırabilirim.Sheets("İLÇEMEM").Range("AP1").Value şeklinde denedim bir sonuç alamadım.

ÜCRETLİ.Text = WorksheetFunction.CountIf(Range("G:G"), "Ücretli")