Tester si un nombre est entier ? [Résolu]

typhoon_74
Messages postés
66
Date d'inscription
jeudi 11 mars 2004
Dernière intervention
11 février 2007
- 21 janv. 2006 à 09:37 - Dernière réponse : ucfoutu
Messages postés
18039
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
- 12 févr. 2015 à 11:18
Bonjour ,

J'ai essayé ce code dans mon programme pour tester si mon nombre était entier mais cela ne marche pas ... Le voici :

If A <> Int(A) then
Msgbox ("Veuillez entrer un nombre entier")
Exit sub
End If

Pouvez vous m'aider ?
Afficher la suite 

4 réponses

Meilleure réponse
cs_DARKSIDIOUS
Messages postés
15838
Date d'inscription
jeudi 8 août 2002
Dernière intervention
4 mars 2013
- 21 janv. 2006 à 09:43
1
Merci
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

_____________________________________________________________________

Merci cs_DARKSIDIOUS 1

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 94 internautes ce mois-ci

Encore mieux :)

If A <> CInt(A) Then
A = Int(A)
End If

ce qui convertit directement le nombre en entier à la saisie :)
ucfoutu
Messages postés
18039
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
- 12 févr. 2015 à 11:18
Bonjour,
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 :
 toto = -23.12
MsgBox Fix(toto) & vbCrLf & Int(toto)
typhoon_74
Messages postés
66
Date d'inscription
jeudi 11 mars 2004
Dernière intervention
11 février 2007
- 21 janv. 2006 à 09:53
0
Merci
Merci beaucoup le premier marche très bien ;)

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.