Sn. Agree aşağıdaki kod ile deneyin.
Kod:Sub Evli_BeKar() Range("L2") = WorksheetFunction.CountIf(Range("G2:G14"), "BEKAR") Range("L3") = WorksheetFunction.CountIf(Range("G2:G14"), "EVLİ") End Sub Sub Kadın_Erkek() Range("N2") = WorksheetFunction.CountIf(Range("F2:F14"), "KADIN") Range("N3") = WorksheetFunction.CountIf(Range("F2:F14"), "ERKEK") End Sub
soru userform üzerindeki textboxlara ocak şubat mart aylarındaki kadın erkek sayılarını toplatmaktı.
