alfazoulou
XLDnaute Occasionnel
Re bonjour à tous.
ma question concerne la copie multiple de feuilles comme indiqué dans le titre.🙂
Je sais écrire un code qui copie l'onglet feuill1, le place après l'onglet feuill10 et le nomme facture 1.
Comme ci dessous.
Sheets("feuill1").Copy After:=Sheets("feuill10")
Sheets("feuill1 (2)").Activate
Sheets("feuill1 (2)").Name = "facture 1"
Ma question:
comment faire pour copier l'onglet feuill1 en 10 exemplaires, les placer après l'onglet feuill10 et les nommer facture 1, facture 2, facture 3, etc...
Merci pour votre aide.
ma question concerne la copie multiple de feuilles comme indiqué dans le titre.🙂
Je sais écrire un code qui copie l'onglet feuill1, le place après l'onglet feuill10 et le nomme facture 1.
Comme ci dessous.
Sheets("feuill1").Copy After:=Sheets("feuill10")
Sheets("feuill1 (2)").Activate
Sheets("feuill1 (2)").Name = "facture 1"
Ma question:
comment faire pour copier l'onglet feuill1 en 10 exemplaires, les placer après l'onglet feuill10 et les nommer facture 1, facture 2, facture 3, etc...
Merci pour votre aide.