Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

vba chiffre entier

zumye

XLDnaute Occasionnel
bonjour le forum

je voudrais qu"une msgbox s'affiche si dans la cellule A1 si celui ci n'est pas un entier.
ex: 25 c'est ok
mais el25 msgbox"erreur ce n'est pas un entier"

merci
 

Catrice

XLDnaute Barbatruc
Re : vba chiffre entier

Bonsoir,

Un exemple qui traite différents cas à adapter :

Sub Test()
If IsNumeric([A1]) Then
If [A1] - Int([A1]) = 0 Then
MsgBox "A1 est un entier"
Else
MsgBox "A1 est un nombre décimal"
End If
Else
MsgBox "A1 n'est pas un nombre"
End If
End Sub
 

Discussions similaires

Réponses
116
Affichages
4 K
Réponses
5
Affichages
165
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…