Discussion :

[UDSP50]

bonjour,
j'ai fait un petit code mais quelque chose cloche

explications:

j'ai un userform (form1) qui possède des labels
je clic sur label1 par exemple cela m'ouvre un second userform (form2)

Dans le form2 il y a un textbox1 qui doit reprendre le caption du label

Mon probleme, c'est que cela ouvre bien le form2 mais n'inscrit pas le caption dans textbox1, il faut que je le ferme et que je le réouvre pour que cela marche

Moi j'aimerais que cela marche au premier clic

Voici mes lignes de code

form1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Private Sub Label1_Click()
Piquets.Show
Piquets.TextBox1.Value = Mensuel.Label1.Name
End Sub

[SfJ5Rpw8]

bonjour,

inverse l'ordre des lignes ...

[UDSP50]

ca fait pareil

[UDSP50]

voila c'est du bricolage mais j'ai géré ca comme cela

form1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Private Sub Label1_Click()
LIGNE01.Value = Label1.Name
Piquets.Show
Piquets.TextBox1.Value = Mensuel.Label1.Name
End Sub

form2

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub UserForm_Initialize()
TextBox1.Value = Mensuel.LIGNE01.Value
End Sub