Copier onglet excel avec incrémentation

Résolu/Fermé
gcavin Messages postés 6 Date d'inscription vendredi 27 juin 2008 Statut Membre Dernière intervention 5 mars 2009 - 13 oct. 2008 à 19:13
AMTProcess Messages postés 2 Date d'inscription jeudi 16 mai 2013 Statut Membre Dernière intervention 19 juin 2013 - 16 mai 2013 à 23:04
Bonjour,
je cherche a faire une macro pour copier un onglet et incrémenter un numéro:

mon onglet s'appel N°1 et j'aimerais en faire une copie et le renommer en N°2, ainci de suite jusqu'a 26

merci d'avance
A voir également:

2 réponses

LatelyGeek Messages postés 1758 Date d'inscription vendredi 4 janvier 2008 Statut Membre Dernière intervention 5 janvier 2023 550
14 oct. 2008 à 16:23
Sub CopieFeuilles()


For Compteur = 26 To 2 Step (-1)

Sheets("N°1").Select
Sheets("N°1").Copy After:=Sheets(1)
NomFeuille = "N°" & Compteur
ActiveSheet.Name = NomFeuille

Next
End Sub
2
AMTProcess Messages postés 2 Date d'inscription jeudi 16 mai 2013 Statut Membre Dernière intervention 19 juin 2013
16 mai 2013 à 23:04
Bonjour,
Merci d'avoir créé cette macro et de l'avoir diffusée, c'est juste ce dont j'avais besoin.
0
gcavin Messages postés 6 Date d'inscription vendredi 27 juin 2008 Statut Membre Dernière intervention 5 mars 2009 1
14 oct. 2008 à 19:11
Cela marche super bien...

en te remercient et en te souhaitant une très bonne soirée

salut Greg
1