Excel macro - Countifs

[wwj]

Code: Select all

            numValidData = WorksheetFunction.CountIf(Sheets(dataSheet).Range("B4:B10"), ">0")

            numValidData = WorksheetFunction.CountIf(Sheets(dataSheet).Range(cA & "4:" & cA & rA), ">0")