Bonsoir Micky, le Forum
Double possibilités et tu n'as pas précisé... VBA ou Formule ?, Enfin voilà les deux, mais en Formule ce n'est pas ma spécialité, il doit y avoir plus simple je pense...On va voir nos spécialistes arriver...
Possibilité Formule :
Test la Cellule A1, Formule en A2
=SI(ESTTEXTE(A1);"La Valeur n'est Pas Numérique";SI(A1="";"La Cellule est Vide";"La Valeur est Numérique"))
Possibilité VBA :
Sub TestIfNumeric()
If Not IsNumeric(Range("A1")) Then
MsgBox "La cellule contient une valeur qui n'est pas numérique"
Else
If Range("A1") = "" Then
MsgBox "La cellule est vide"
Else
MsgBox "La cellule contient une valeur numérique"
End If
End If
End Sub
Bonne Soirée
@+Thierry