Bonsoir à tous,
ma question est assez simple pour vous mais un vrai casse tête pour moi.
je viens de faire un userform avec deux textbox. j'arrive à le faire apparaitre en cliquant sur un bouton mais les deux textbox sont vide.Le curseur est dans la textbox1 et il faut appuyer sur n'importe quelle touche pour voir apparaitre la valeur d'une cellule définie et il faut cliquer sur la deuxième text box pour que le curseur y soit et réappuyer sur une touche pour voir apparaitre la valeur de la deuxième cellule.
Est-ce qu'il serait possible de seulement cliquer sur le bouton et que les valeurs apparaissent directement.Pour l'instant j'ai juste mis ces codes-ci.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Sub Bouton1_Clic()
UserForm1.Show
End Sub
(Dans le Classeur1 - Module(code))

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Private Sub TextBox1_Change()
TextBox1.Text = ThisWorkbook.Sheets("Feuil2").Range("B3").Value
End Sub
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Private Sub TextBox2_Change()
TextBox2.Text = ThisWorkbook.Sheets("Feuil2").Range("B2").Value
End Sub
(Dans le Classeur1 - Userform1(code))

Merci d'avance pour vos conseils éclairés.