Vba: como usar isnumeric para verificar se a célula é um número
Você pode usar a função IsNumeric no VBA para verificar se uma determinada célula é um número.
Esta função retornará True se o valor de uma determinada célula for reconhecido como um número.
Caso contrário, a função retornará False .
Esta é uma maneira comum de usar esta função na prática:
SubCheckNumeric ()
Dim i As Integer
For i = 1 To 9
If IsNumeric(Range(" A " & i)) = True Then
Range(" B " & i) = " Numeric Value "
Else
Range(" B " & i) = " Not a Numeric Value "
End If
Next i
End Sub
Esta macro específica irá verificar se cada célula no intervalo A1:A9 é um número.
Se uma célula for um número, então “Valor Numérico” será retornado na célula correspondente no intervalo B1:B9 .
Se uma célula não for um número, então “Não é um valor numérico” será retornado.
O exemplo a seguir mostra como usar essa sintaxe na prática.
Exemplo: como usar IsNumeric em VBA
Suponha que temos a seguinte coluna de valores no Excel:
Suponha que queiramos verificar se cada célula da coluna A é um número.
Podemos criar a seguinte macro para fazer isso:
SubCheckNumeric ()
Dim i As Integer
For i = 1 To 9
If IsNumeric(Range(" A " & i)) = True Then
Range(" B " & i) = " Numeric Value "
Else
Range(" B " & i) = " Not a Numeric Value "
End If
Next i
End Sub
Quando executamos esta macro, recebemos a seguinte saída:
A coluna B exibe um resultado que nos informa se cada célula correspondente na coluna A é ou não reconhecida como um número.
Aqui estão algumas coisas interessantes a serem observadas no resultado:
- Números com casas decimais são reconhecidos como números.
- As porcentagens são reconhecidas como números.
- As datas não são reconhecidas como números.
- Textos contendo números não são reconhecidos como números.
Nota : Você pode encontrar a documentação completa da função IsNumeric do VBA aqui .
Recursos adicionais
Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:
Como converter string em int em VBA
Como converter uma string em double em VBA
Como verificar se uma string contém outra string em VBA