Activation d'une TextBox

[Pierrot]

Après avoir cocher une checkbox, je fais apparaitre une textbox, dans laquelle l'utilisateur doit saisir une valeur. Cependant l'utilisateur en question doit lui même cliquer dans cette TextBox pour y saisir sa valeur.
Comment puis je faire activer le curseur dans cette textbox, après avoir cocher la TextBox.

Merci du coup de pouce.

 

[Thierry]

Bonjour Pierrot,

Pour activer une TextBox en saisie direct (sans avoir à clicker dedans)
tu peux utiliser la méthode: SetFocus

Selon ton exemple Ton code devrait donc ressembler à çà :

Private Sub UserForm_Initialize()
TextBox1.Visible = False
End Sub

Private Sub CheckBox1_Change()
If CheckBox1 = True Then TextBox1.Visible = True
TextBox1.SetFocus
If CheckBox1 = False Then TextBox1.Visible = False
End Sub

C'est bien çà ?

Bonne Journée
@+Thierry

 

[Pierrot]

Merci beaucoup