Count numeric cells in a range

Macro Title:

Worksheet Variable:

Worksheet Name:

Range Reference:
enter the range from which you want to count only numeric cells

Output Cell:

First Comment:

Second Comment:

Sub Count_numeric_cells_in_a_range()

'declare a variable
Dim ws As Worksheet

Set ws = Worksheets("Analysis")

'count numeric cells in range (B5:C11) using the COUNT function
ws.Range("F4") = Application.WorksheetFunction.Count(ws.Range("B5:C11"))

End Sub

Sub Count_numeric_cells_in_a_range()

'declare a variable

Dim ws As Worksheet

Set ws = Worksheets("Analysis")

'count numeric cells in range (B5:C11) using the COUNT function

ws.Range("F4") = Application.WorksheetFunction.Count(ws.Range("B5:C11"))

End Sub

Sub Count_numeric_cells_in_a_range()

'declare a variable
Dim ws As Worksheet

Set ws = Worksheets("Analysis")

'count numeric cells in range (B5:C11) using the COUNT function
ws.Range("F4") = Application.WorksheetFunction.Count(ws.Range("B5:C11"))

End Sub