Petit Claude,
Pour ta question 1, tu rajoute ce code :
Dans le Thiswoorkbook et dans le Command bouton 1
UserForm1.TextBox1.Text = Feuil1.[B15]
Avant l'ouverture de L'userForm
Par contre tu peu supprimer LoadUserForm1, juste UserForm1. Show 0 suffit
En claire:
Dans le Thiswoorkbook
Private Sub Workbook_Open()
UserForm1.TextBox1.Text = Feuil1.[B15]
UserForm1.Show 0
End Sub
Et dans le CommandButton1 :
Private Sub CommandButton1_Click()
UserForm1.TextBox1.Text = Feuil1.[B15]
UserForm1.Show 0
End Sub
Pour ta question 2, je ne sais pas mais je pense qu'il va y avoir d'autres réponses
Salut,G'Claire