XL 2010 Condition d'une combobox

  • Initiateur de la discussion Initiateur de la discussion thunder23
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

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
 
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 .
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Microsoft 365 Combobox
Réponses
6
Affichages
199
Réponses
9
Affichages
256
Réponses
5
Affichages
312
Réponses
2
Affichages
214
Retour