une seule userform qui remplira plusieurs feuilles

[belhout]

bonjour, je suis un petit débutant sur vba et je voulais savoir un petit truc. Vous verez mon petit prog en pièce jointe, ce que je souhaite faire c'est que :
si j'ouvre le userform1 grace à un bouton situé sur la feuille 1 les données seront saisie sur la feuille 1
si j'ouvre ce même userform1 sur la feuille 2 les données devront être saisie sur la feuille 2 etc....pour la feuille 3 idem
si vous avez la réponse je vous en remercie d'avance.

 

[JPH]

J'ai ajouté à ton fichier :
Private Sub CommandButton1_Click()
Dim LastRow As Object
Dim mafeuille As Object '+++++++++++++
Set mafeuille = ActiveSheet '++++++++++
Set LastRow = mafeuille.Range("a65536").End(xlUp)

LastRow.Offset(1, 0).Value = TextBox1.Text
LastRow.Offset(1, 1).Value = TextBox2.Text
LastRow.Offset(1, 2).Value = TextBox3.Text
etc.......
Après essai c'est Ok!
Fichier joint !!!

cordialement