Sujet Précédent Sujet Suivant

If not VBA

totyo -  
 lavachequirit -
Bonjour les amis,

J'ai une question un pe debile, mais je sais pas comment formuler ca en VBA:

si x n'est pas un entier alors message d'erreur

j'ai tenter un truc du genre mais ca marche pas:
if not x as integer then
msgbox("veuiller rentrer un entier", vbok)

merci d'avance

2 réponses

Réponse 1 / 2
ccm81 Messages postés 11033 Statut Membre 2 434
 
bonjour
quelque chose comme ça 

  If a = Int(a) Then
    MsgBox ("a est entier")
  Else
    MsgBox (" a n'est pas entier")
  End If

bonne suite
1
lavachequirit
 
bien joué
0
Réponse 2 / 2
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
Bonjour

Tu as la fonction Vartype

Vartype(x) renvoie 2 pour un entier

If vartype(x)<>Z then
ou + lisible à mon avis
If vartype(x)<>vbinteger then
1

Discussions similaires

" Signal Cable Not Connected " écran Iiyama
Mandinal -
mandinal -

5 réponses
The Realtek Network Controller was not found
Maxime949 -
kaneagle -

1 réponse
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
VBA excel : résoudre problème de capacité.
Juan Pedro -
Kunzi -

9 réponses
"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses