Champ grisé et Enabled

Bonjour,

J'ai un fichier Excel qui un 400 lignes et un formulaire pour une association.



Voici le code:

Code:

---

1 2 3 4 5 6 7

Private Sub cboformation_Change() ' Active le Tbx si la formation est OUI Me.txtdateformation.Enabled = Me.cboformation.Value = "Oui" End Sub     End Sub

---

Le code marche bien mais par contre je voudrai que lorsque la formation NON la date est grisé.

Pour ouvrir le formulaire il faut 2 clics sur le nom de la personne.

Merci de votre aide.

Pièce jointe 635722

bonjour
juste suprimer " ' " devant Me.txtdateformation.Locked = Me.cboformation.Value = "Non" ce qui donne

Code:

---

1 2 3 4 5

Private Sub cboformation_Change() ' Active le Tbx si la formation est OUI Me.txtdateformation.Enabled = Me.cboformation.Value = "Oui" Me.txtdateformation.Locked = Me.cboformation.Value = "Non" End Sub

---

tu peux aussi cacher le textbox avec

Code:

---

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

Private Sub cboformation_Change() ' Active le Tbx si la formation est OUI Me.txtdateformation.Enabled = Me.cboformation.Value = "Oui" Me.txtdateformation.Locked = Me.cboformation.Value = "Non" If Me.cboformation.Value = "Non" Then txtdateformation.Visible = False lbldateformation.Visible = False Else txtdateformation.Visible = True lbldateformation.Visible = True End If   End Sub

---

Citation:

---

Envoyé par BENNASR

tu peux aussi cacher le textbox avec

---

On peut aussi griser comme il a demandé au lieu de masquer.

Code:

---

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

Private Sub cboformation_Change() ' Active le Tbx si la formation est OUI Me.txtdateformation.Enabled = Me.cboformation.Value = "Oui" Me.txtdateformation.Locked = Me.cboformation.Value = "Non"   If Me.cboformation.Value = "Non" Then Me.txtdateformation.BackColor = RGB(128, 128, 128)   Else Me.txtdateformation.BackColor = RGB(255, 255, 255) End If   End Sub

---

Merci à BENNASR ET à Niagala

C'est tout à fait ce que vouler.

Merci pour tout et la réponse ratide.