Bonjour,
j'aimerais faire un select case sur plusieurs variables. Mais je me retrouve confronté à un pbm quand je fait un test sur les 2 en même temps.
J'ai fait juste un petit bout de code pour tester :
Le problème est que pour une raison qui m'est inconnue, si dans le premier cas celà test 2 integer, dans le second cas malgrès les "" celà fait un test sur un Long (si je mets la souris sur le AND du 2 ème cas il semble déclarer comme un Long).
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
17
18 Dim a As String Dim b As String a = 1 b = 2 Select Case a And b Case 1 And 2 MsgBox("1 et 2") Case "ok" And "ok" MsgBox("ok") Case Else MsgBox("Try AgAin") End Select
Il doit y avoir une raison mais aussi une solution mais là je sèche.
Ou alors si y a une autre solution pour tester plusieurs variables voir même un array je suis preneur
Partager