Discussion :

[chrisaccess]

Bonjour,

Je dois à partir d"une variable pouvant avoir plusieurs valeurs éxécuter une liste de commande si cette variable à 2 formes.

J'ai rechercher dans tutoriel et faq car cela me semble être de l'apprentissage mais je ne trouve pas.

Voici pour être clair le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
If dempart = "MOAD BT DEMANDE VALIDATION ET EOTP" Or "MOAD BT DEMANDE ARBITRAGE" Then
    relancee.Label29.Visible = False
    relancee.dat_retinterv_arex.Visible = False
    relancee.Label25.Visible = False
    relancee.dat_rip.Visible = False
    relancee.Label30.Visible = False
    relancee.rip.Visible = False
    relancee.Label35.Visible = False
    relancee.Label36.Visible = False
    relancee.nombre_relance_rip.Visible = False
    relancee.Label42.Visible = False
    relancee.derndate_relance_rip.Visible = False
    relancee.Label31.Visible = False
    relancee.dat_inter_arex.Visible = False
    relancee.Opti3.Visible = False
    relancee.alertedte.Visible = False

Ce code met en forme un userform avant de l ouvrir.

Ce qui ne fonctionne pas c'est la première ligne avec l'utilisation de or.

Est ce que if est la solution.
J'ai regardé aussi select case mais je me retrouve à recopier 2 fois l'ensemble du code.

Le but est de ne pas avoir à le recopier 2 fois, car ceci je sais faire.

Est ce que if end if est la bonne condition et alors comment l'utiliser pour ce cas, ou y a t il une autre pour ce cas?

Merci pour votre aide

[jfontaine]

Bonjour

Essais comme cela

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If dempart = "MOAD BT DEMANDE VALIDATION ET EOTP" Or dempart  = "MOAD BT DEMANDE ARBITRAGE" Then

[chrisaccess]

Bonsoir,

J'étais sûr d'avoir essayer cette solution mais apparemment pas du tout ou mal écrite. En effet celà fonctionne, il va falloir que je révise

Merci pour ta grande aide.