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.