Discussion :

[PPLILH2008]

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.

[HurGeek]

Bonjour PPLILH2008,

Désolé mais je n'ai absolument rien compris...
Que souhaites tu afficher dans ta box? Le contenu de plusieurs cellules? Le contenu de plusieurs cellules "mis en forme" (qu'appelles tu mise en forme dans une box?) ?

[PPLILH2008]

bonjour HurGeek,

je suis vraiment désolé du manque de limpidité de mon premier message. De plus j'ai complètement changé d'optique. J'ai modifié mon massage de départ et là je crois que c'est plus claire.

Merci de ta réponce