Is the cell numeric : IsNumeric « Data Type Functions « VBA / Excel / Access / Word

1. VBA / Excel / Access / Word
2. Data Type Functions
3. IsNumeric

Is the cell numeric

 
Sub ResetTest2()
    For Each n In Range("A1:A8")        '   Substitute your range here
        If IsNumeric(n) Then
            n.Value = 0
        End If
    Next n
End Sub

 

Related examples in the same category