Fonction VBA : IsNumeric
La fonction VBA IsNumeric renvoie True si la valeur est un nombre (ou si elle peut être considérée comme un nombre) ou False si ce n'est pas le cas.
Utilisation :
IsNumeric(valeur)
Exemple d'utilisation
Utilisation de la fonction IsNumeric pour vérifier si la valeur entrée par l'utilisateur peut être considérée comme un nombre :
Sub exemple()
nombre = InputBox("Entrez un nombre :")
'Test de la valeur entrée
If IsNumeric(nombre) Then
'Action à effectuer si la valeur entrée est un nombre
MsgBox "Bravo, bel effort !"
End If
End Sub
Exemple de valeurs
Utilisation de la fonction IsNumeric pour déterminer si les différentes valeurs suivantes peuvent être considérées comme des nombres :
Sub exemple()
MsgBox IsNumeric(0) 'Renvoie : True
MsgBox IsNumeric("0") 'Renvoie : True
MsgBox IsNumeric(1) 'Renvoie : True
MsgBox IsNumeric("1") 'Renvoie : True
MsgBox IsNumeric(" 1 ") 'Renvoie : True
MsgBox IsNumeric(-45) 'Renvoie : True
MsgBox IsNumeric("45") 'Renvoie : True
MsgBox IsNumeric("-45") 'Renvoie : True
MsgBox IsNumeric(36.21) 'Renvoie : True
MsgBox IsNumeric("-36.21") 'Renvoie : True
MsgBox IsNumeric(3 + "2") 'Renvoie : True
MsgBox IsNumeric(True) 'Renvoie : True
MsgBox IsNumeric(False) 'Renvoie : True
MsgBox IsNumeric("3b") 'Renvoie : False
MsgBox IsNumeric("un") 'Renvoie : False
MsgBox IsNumeric("") 'Renvoie : False
MsgBox IsNumeric(Null) 'Renvoie : False
End Sub