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:
Bool
Parâmetros:
Var: qualquer expressão que você deseje testar.
Exemplo:
Sub ExampleIsNumeric
Dim vVar As Variant
vVar = "ABC"
Print IsNumeric(vVar) ' retorna Falso
vVar = "123"
Print IsNumeric(vVar) ' retorna Verdadeiro
End Sub