éxécution d'un code sous condition

bonjour
j'ai un code qui déverrouille un sous-formulaire en fonction d'une case à cocher tout marche nikel
mais j'aimerai mettre une condition en plus
c'est à dire que l'on peut cocher la case seulement si un champ est rempli.
sinon j'aimerai faire apparaitre une combo box de genre "remplissez d'abord le champ"
voila si quelqu'un a une idée
merci

voila mon code pour l'instant :

Code:

---

1 2 3 4 5 6 7

Private Sub Déclinaison_en_sous_produit_AfterUpdate() If Me.[Déclinaison en sous-produit].Value = True Then Me.[Saisie Sous-produits].Enabled = True Else Me.[Saisie Sous-produits].Enabled = False End If End Sub

---

Tu imbrique tes conditions

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Private Sub Déclinaison_en_sous_produit_AfterUpdate() If me.liste.Value = "" then msgbox "vous devez choisir" else If Me.[Déclinaison en sous-produit].Value = True Then Me.[Saisie Sous-produits].Enabled = True Else Me.[Saisie Sous-produits].Enabled = False End If end if End Sub

---

ou alors

Code:

---

1 2	If Me.[Déclinaison en sous-produit].Value = True AND Me.liste.value <> "" Then

---

Salutations

j'ai essayé les deux j'ai remplacer liste par le nom de mon champ mais il se passe rien
je sais pas ou est le problème

si ça fait suer, tu met ta case à cocher enabled à l'ouverture du form et apres mise à jour de ta listbox, tu passe case à cocher à actve