Data Type Functions VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Data Type Functions
  4. 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