FUNÇÃO DE VERIFICAÇÃO DE CONTEÚDO - ISNUMERIC

IsNumeric

    Função empregada para verificar se uma variável declarada As Variant, As String ou uma expressão, pode ser avaliada como um valor numérico, retornando True ou False, utilizando esta sintaxe:

IsNumeric(Expressão)

Onde,

• Expressão: argumento obrigatório, consistindo no nome de uma variável ou em uma expressão válida envolvendo variáveis e/ou valores numéricos.

Exemplo: IsNumeric permite verificar o conteúdo de uma variável antes de efetuar uma operação. Ela é útil quando se emprega a função InputBox() para recuperar um valor digitado pelo usuário e verificar se este valor é ou não numérico (pois InputBox sempre retorna uma string)

Function SomaValores()

  Dim strValor as String
  Dim strMsg as String
  Dim strTitle as String

StrMsg = “Digite o ano a partir do qual os valores devem ser somados (formato ‘2003’):”

strTitle = “Ano para totalização”

strValor = InputBox(strMsg, strTitle)

If IsNumeric(strValor) Then

    ‘A função irá passar por aqui apenas se o usuário digitar um valor numérico válido

...

End If

Até a Próxima!!