Bonjour
J'ai un problème vraiment incompréhensible, je fais un select (d'un parametre qui peut etre g1,g2,g3,g4) et dans chaque cas je teste si le deuxieme parametre est a vrai ou faux.
Donc voici mon code:
Select Case groupe
Case "G1":
If passe Then
debx = der_ligne_G1
x = der_ligne_G1
MsgBox "argpresent"
Else
debx = der_ligne_kembs_G1
x = der_ligne_kembs_G1
End If
Case "G2":
If passe Then
debx = der_ligne_G2
x = der_ligne_G2
MsgBox "argpresent"
Else
debx = der_ligne_kembs_G2
x = der_ligne_kembs_G2
End If
Case "G3":
If passe Then
debx = der_ligne_G3
x = der_ligne_G3
MsgBox "argpresent"
Else
debx = der_ligne_kembs_G3
x = der_ligne_kembs_G3
End If
Case "G4":
If Not passe Then
MsgBox "c bon" & der_ligne_kembs_G4
debx = der_ligne_kembs_G4
x = der_ligne_kembs_G4
Else
debx = der_ligne_G4
x = der_ligne_G4
MsgBox " pas de kembs du g4"
End If
End Select
ancienx = x
MsgBox x
Et donc j'ai testé pour le g4 mais le problème serait le même pour les autres, si passe est à vrai x vaut bien der_ligne_g4 mais si jamais passe est a faux x vaut 0 (alors que j'ai testé mon der_ligne_kembs_g4 vaut toujours 1) ce qui est du je crois au fait qu'il ne passe pas dans le THEN à ce moment là.
Si quelqu'un pouvait m'aider ce serait sympa (me dire où est mon erreur ou me donner une solution équivalente) parce que là ca fait kan meme un bout de temps que je suis la dessus.
Merci.
PS: J'ai testé aussi si par hasard mon paramètre booléen n'était pas bon mais sur un autre IF qui n'est pas dans le select ça fonctionne correctement.