XL 2016 Selection Textbox d'apres case a cocher (Resolu)

[CelluleVide]

Bonjour a tous,
dans un userform, je voudrais n'autoriser la saisie dans une textbox que pour une option choisie au préalable
Soit en masquant ou "en grisant" la textbox
A voir dans le fichier joint.

A+

 

[M12]

Bonjour
A tester

 

[M12]

Re,

Ou pour rendre le Textbox2 visible ou pas remplacer par ce bout de code

Private Sub Poste1_AfterUpdate()
  If Me.Poste1 = True Then
    Me.TextBox2.Visible = True
    Me.Label2.Visible = True
    Me.TextBox1.SetFocus
  End If
End Sub

Private Sub Poste2_AfterUpdate()
  If Me.Poste2 = True Then
    Me.TextBox2.Visible = False
    Me.Label2.Visible = False
    Me.TextBox1.SetFocus
  End If
End Sub


Private Sub Poste3_AfterUpdate()
   If Me.Poste3 = True Then
    Me.TextBox2.Visible = False
    Me.Label2.Visible = False
    Me.TextBox1.SetFocus
  End If
End Sub

 

[CelluleVide]

Bonjour M12
C'est le After update qui me faissit defaut.
Je vais adapter la solution 2 a mon fichier d'origine.
Merci a toi et bonne journée!