Discussion :

[b.berthelot]

Salut à tous, je suis débutant en prog et j'aurais voulu savoir comment dupliquer un code contenu dans VB vers une autre feuille...

en fait, j'ai une feuille execl avec un bouton qui, lorsque je clic dessus, copie le contenu de la feuille en cours, crée une autre feuille à la suite de la précedente et colle ce contenu (donnée dans des cellules + 1 CommandButton). Ca, ca marche, pas de prob. Maintenant, j'aimerais ajouter comme action a ce meme commandbutton le fait de copier son propre code de la premiere feuille et de le coller dans le code du nouveau commandbutton copier précedemment...

dispo pour + de renseignement, n'hésitez pas !!

[Invité]

Bonjour et bienvenue sur le Forum,

Puisque votre nouvelle feuille semble, au départ, devoir être une copie conforme de la précédente pour quoi ne pas utiliser par exemple ce type de code (à adapter et à mettre dans un module) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sheets("Feuil1").Copy After:=Sheets(1)
Sheets("Feuil1 (2)").Select
Sheets("Feuil1 (2)").Name = "Feuil2"

[JPierreM]

Et en faisant simplement une copie de ta feuille, les données et le bouton seront dupliqués, code compris

[b.berthelot]

Merci jacques_jean, ca je l'ai déjà fait, ca marche niquel !

[b.berthelot]

OK JPierreM, mais c'est ce que j'ai déjà fait : une copie de feuille..., mais ca ne copie que les données dans la cellule, ca ne copie pas le bouton (j'ai réussi à copier le commandbutton en passant par un autre code), mais je n'arrive pas à copier le code du bouton ?!