bonjour,
En fait j'ai trouvé et c'est très simple:
Dans Userform du menu VBA, double clique dessus, il apparaît un Boîte à outils. j'ai utilisé la boîte à outil pour créer ma fenêtre qui s'appelle Userform1.
Dans Userform:
Private Sub CommandButton1_Click()
If TextBox1.Value <> "" Then Sheets("IMP" ).Range("j2" ).Value = TextBox1.Value
Je veux faire apparaître la fenêtre à l'ouverture:
Private Sub Worksheet_Activate()
UserForm1.Show
End Sub