If avec Conditions multiples

Version imprimable

06/05/2008, 12h06
sophiefag

If avec Conditions multiples

Bonjour,

J'aimerais sélectionner plusieurs conditions de type:

If optionbuttonx= true then

Et là: choix entre trois différentes options d'une ComboBox

ElseIf optionbuttony= true then

Et de nouveau: choix entre trois différentes options d'une ComboBox

Quelle est la structure (If, ElseIf, Else?), j'ai essayé plusieurs combinaisons mais sans résultats...?

Merci pour votre aide!

Bonjour

voila deux structures

Attention chaque else if n’est effectué que si le test précédant est faux

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
If test = 1 Then      'Premier test
'action1
 
ElseIf test = 2 Then  'si le précédant est faux : deuxième test
'action2
 
ElseIf test = 3 Then  'si les précédants sont faux : troisiéme test
'action3
 
Else                  'dans n'importe quel autre cas
'action4
 
End If

Si tu veux tous les tester il te faut plusieurs if

Code:

1
2
3
4
5
6
7
8
9
10
11
12
 
If test = 1 Then      'Premier test
'action1
End If
 
If test = 2 Then      'deuxième test
'action2
End If
 
If test = 3 Then      'troisiéme test
'action3
End If

J'espère que c'est assez clair

Merci mais...

Mais comment faire pour inclure cette structure dans ce type de structure?

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
If bottonX = true Then
    If ComboBoxX1 = a then
    action 1
   If ComboBoxX2 = b then
   action 2
   If ComboBoxX3 = c then
   action 3
End If
 
ElseIf bottonY = true then
    If ComboBoxY1 = a' then
    action 1'
    If ComboBoxY2 = b' then
    action 2'
    If ComboBoxY3 = c' then
   action 3'
End If

Merci!

06/05/2008, 12h35
SilkyRoad
bonjour

tu peux utiliser l'instruction Select Case :
Code:

1 2 3 4 5 Select Case ComboBox1 Case a: Action1 Case b: Action2 Case c: Action3 End Select
http://bidou.developpez.com/article/VBA/

bonne journée
michel

S'il s'agit réellement de combox différents la forme serait celle ci

Code:

1
2
3
4
5
6
7
8
9
10
11
If bottonX = True Then
  If ComboBoxX1 = a Then action 1
  If ComboBoxX2 = b Then action 2
  If ComboBoxX3 = c Then action 3
End If
 
If bottonY = True Then
  If ComboBoxY1 = a Then action 1
  If ComboBoxY2 = b Then action 2
  If ComboBoxY3 = c Then action 3
End If