Tester si un nombre est entier ? [Résolu]
typhoon_74
Modérateur Dernière intervention
11 avril 2018
- 12 févr. 2015 à 11:18
- Messages postés
- 66
- Date d'inscription
- jeudi 11 mars 2004
- Dernière intervention
- 11 février 2007
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
A voir également:
- Python tester si un nombre est entier
- Vba nombre entier - Meilleures réponses
- Tester si un nombre est entier python - Meilleures réponses
- Tester si un nombre reel est entier ✓ - Forum - Delphi / Pascal
- Python : Tester la fiabilitée de la fonction randrange avec interface type sismographe - Cod - Guide
- Python : Fonction compter le nombre de ligne - CodeS SourceS - Guide
- Python : Test musique intervalles - CodeS SourceS - Guide
- Python : Calcul list de nombres premiers - CodeS SourceS - Guide
2 réponses
Meilleure réponse
- Messages postés
- 15838
- Date d'inscription
- jeudi 8 août 2002
- Dernière intervention
- 4 mars 2013
Essaye ceci :
If Not IsNumeric(A) Then
MsgBox ("Veuillez entrer un nombre entier")
Exit Sub
End If
If A <> CInt(A) Then
MsgBox ("Veuillez entrer un nombre entier")
Exit Sub
End If
_____________________________________________________________________
If Not IsNumeric(A) Then
MsgBox ("Veuillez entrer un nombre entier")
Exit Sub
End If
If A <> CInt(A) Then
MsgBox ("Veuillez entrer un nombre entier")
Exit Sub
End If
_____________________________________________________________________
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
116 internautes nous ont dit merci ce mois-ci
- Messages postés
- 66
- Date d'inscription
- jeudi 11 mars 2004
- Dernière intervention
- 11 février 2007
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.
If A <> CInt(A) Then
A = Int(A)
End If
ce qui convertit directement le nombre en entier à la saisie :)
un numérique toto est entier si Fix(toto) = toto
Il y a une différence importante entre Int et Fix
Preuve du piège à éviter :