IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

[VBA-Excel] - nombre de cas possibles


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé Avatar de Chewi
    Étudiant
    Inscrit en
    Août 2006
    Messages
    180
    Détails du profil
    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Août 2006
    Messages : 180
    Par défaut [VBA-Excel] - nombre de cas possibles
    Bonjour et Re pour certains.

    Quelle est la méthode à utiliser à la place de ceci?
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    If ComboBox2.Value = "droite" Or ComboBox2.Value = "gauche" Or ComboBox2.Value = "centré" Then
    Un truc du genre:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    If ComboBox2.Value = (droite;gauche;centré) Then
    (J'ai une dizaine de possibilités en réalité, d'où l'intérêt)

    Je suis désolé de poster pour une question comme celle-ci mais comment trouver ce que je cherche sans savoir quoi chercher?

  2. #2
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Tu as plusieurs possibilités
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Dim ok as boolean
    LesMots = Array("Gauche","Droite", "Dessus","Dessous","En bas","En Haut","Dedans", "Dehors")
    For i = 0 to Ubound(LesMots)
         ok = ok or ComboBox2.Value = LesMots(i)
    Next
    ou bien, pour faire plus simple
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ok = "GaucheDroiteDessusDessousEn basEn HautDedansDehors" like "*" & ComboBox2.Value & "*"
    Faut simplement être sûr de ne pas se tromper dans les majuscules ou les minuscules
    A+

    Edit
    Attention, si tu as "En Dessus" et "Dessus", ça ne fonctionnera pas car si tu vérifies "Dessus" tu l'auras dans les deux cas et dans ce cas, mets une minuscule à "En dessus"... pour pas être sans dessus dessous

  3. #3
    Membre confirmé Avatar de Chewi
    Étudiant
    Inscrit en
    Août 2006
    Messages
    180
    Détails du profil
    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Août 2006
    Messages : 180
    Par défaut
    Re,

    Il n'y a rien à faire,

    Je ne sais pas si mon QI diminue de jours en jours (si c'est le cas, il est temps de m'inquiéter pour le futur), mais je comprend pas ton code.

    Mon "If" Dans tout ça, il intervient où?
    A l'intérieur de la boucle?
    Et où met-on le "Else" ?

    Merci,

    Chewi

  4. #4
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    A la fin des deux codes, tu peux mettre
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    If ok then msgbox "Tu fais ce que tu veux"
    Si ok est true, c'est que l'un des mots a été trouvé, et donc, c'est ok que tu testes dans ton "If"
    Descends de ton arbre, un peu

  5. #5
    Membre confirmé Avatar de Chewi
    Étudiant
    Inscrit en
    Août 2006
    Messages
    180
    Détails du profil
    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Août 2006
    Messages : 180
    Par défaut
    A mon avis je devrais plutôt y remonter pour me ressourcer

    Merci Ouskel'nord, tout fonctionne parfaitement (tant que je ne touche pas au code )

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [VBA Excel]Nombre hexa trop grand ?
    Par rtg57 dans le forum Macros et VBA Excel
    Réponses: 25
    Dernier message: 09/12/2008, 07h42
  2. VBA Excel: Nombre de fichiers Excel ouverts
    Par mamid1706 dans le forum Macros et VBA Excel
    Réponses: 7
    Dernier message: 18/01/2008, 15h26
  3. {VBA Excel} Optimiser macro si possible
    Par Thomas69 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 05/06/2007, 16h06
  4. [VBA-Excel] Nombre total de ligne d'un onglet
    Par marsupilami34 dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 04/01/2007, 23h38
  5. [VBA Excel 2002] Nombre de feuilles maximum
    Par Viper7 dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 27/06/2006, 13h26

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo