Função IsNumeric

Testa se uma expressão é um número. Se a expressão é um número, a função retorna Verdadeiro, caso contrário a função retorna Falso.

Sintaxe:

IsNumeric (Var)

Valor de retorno:

Boolean

Parâmetros:

Var: qualquer expressão que você deseje testar.

Exemplo:

Sub ExampleIsNumeric
Dim vVar As Variant
    vVar = "ABC"
    Print IsNumeric(vVar) ' False
    vVar = "123"
    Print IsNumeric(vVar) ' True
End Sub