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 10853 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 avril 2024 2 404
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 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
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