Un double archivage

[S & F]

Bonjour à tous,

Nous essayons d'archiver des donnees sur deux feuilles de calcule simultanement à l'aide d'un seul userform. Voici le bidouillage que nous avons tenté et cela ne marche evidement pas. si qlq un a une solution benit soit il

Private Sub UserForm_Click()
Private Sub CommandButton1_Click()
Sheets('Histpel').Select
Range('B6').Select
Sheets('Virements').Select
Range('A2').Select

Merci bcp,

S & F

 

[porcinet82]

Salut S & F,

Regarder le fichier joint pour voir si c'est ce que vous cherché, pour info, lorsque vous appuyer sur le bouton ok du USF, le contenu du textbox estinscrit dans la cellule A1 de la feuil1 et de la feuil2.

[file name=SetF.zip size=9698]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SetF.zip[/file]

@+

 

[S & F]

Merci beaucoup, nous allons essayer ... bonne journée,

S & F