XL 2010 Condition d'une combobox

thunder23

XLDnaute Occasionnel
Bonjour le forum,

Je rencontre un soucis dans mon code vba, en fait je souhaite que si la date dans une combobox est inférieur à une autre date dans une cellule ça prenne en compte une première condition sinon la deuxième. J'ai déjà une partie du code qui fonctionne mais je n'arrive pas savoir comment faire la condition.
Voici le code en question:
VB:
Private Sub CommandButton_valider_Click()
    Select Case ComboBox_Poste.Value 'combobox contenant le poste CP ou CPN
    Case "CP" To "CPN"          'Programme pour condition si solde CP insufisant
        If ComboBox_date.Value <= [Congés!F8] Then  'Congé!F8 contient une autre date
            Soldecp = [Congés!B24].Value
        Else
            Soldecp = [Congés!H24].Value
        End If
        If Soldecp = 0 Then
            MsgBox "Votre solde de congé payé est insufisant !", 16, "ATTENTION"
            Exit Sub
        End If

Merci
 

fanch55

XLDnaute Barbatruc
VB:
Private Sub CommandButton_valider_Click()
    Select Case ComboBox_Poste.Value 'combobox contenant le poste CP ou CPN
    Case "CP" To "CPN"          'Programme pour condition si solde CP insufisant
        If ComboBox_date.Value <= [Congés!F8] Then  'Congé!F8 contient une autre date
            Soldecp = [Congés!B24].Value
        Else
            Soldecp = [Congés!H24].Value
        End If
        If Soldecp = 0 Then
            MsgBox "Votre solde de congé payé est insufisant !", 16, "ATTENTION"
            Exit Sub
        End If

Merci
Salut, sans un véritable fichier expurgé, cela va être dur de vous répondre :
A partir d'un combobox Poste,
Vous comparez la valeur d'un combobox Date à une cellule, sans savoir ce que les trois contiennent, on va avoir du mal à cerner le pb .
 

Discussions similaires

Réponses
28
Affichages
977

Statistiques des forums

Discussions
312 184
Messages
2 086 008
Membres
103 089
dernier inscrit
johnjohn1969