If not VBA

Fermé
totyo - 21 févr. 2011 à 16:53
 lavachequirit - 28 juin 2011 à 10:21
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

ccm81
Messages postés
10418
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
11 août 2022
2 306
Modifié par ccm81 le 21/02/2011 à 17:58
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
28 juin 2011 à 10:21
bien joué
0
michel_m
Messages postés
16574
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
3 août 2022
3 277
21 févr. 2011 à 18:05
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