vba chiffre entier

zumye · 13 Janvier 2009

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 · 13 Janvier 2009

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

zumye · 13 Janvier 2009

Re : vba chiffre entier

merci catrice

vba chiffre entier

zumye

XLDnaute Occasionnel

Catrice

XLDnaute Barbatruc

zumye

XLDnaute Occasionnel

Discussions similaires

vba chiffre entier

zumye

XLDnaute Occasionnel

Catrice

XLDnaute Barbatruc

zumye

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency