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 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
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 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
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
"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
Iron tv pro bugs
Chafa -
bazfile -

2 réponses