Bonjour,

Tout est dans le titre.

Pour l'exemple:

Ce code n'est-il pas correct?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub UserForm1_Initialize()
 
Me.Label1.Caption = Sheets("Feuil1").Range("A1").Value
 
End Sub
j'ouvre mon UserForme avec un bouton sur ma feuil1:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub CommandButton1_Click()
 
UserForm1.Show
 
End Sub

Mais mon label1 est vide...

Où est l'erreur?