dupliquer un onglet excel

K.SICAME

XLDnaute Nouveau
Bonjour,

J'aimerais pouvoir dupliquer un onglet 52 fois. Cet onglet s'appelle "S (1)" et je souhaite aller jusqu'à "S (52)". J'ai essayer avec une macro mais j'ai trouvé que pour dupliquer une seule fois la feuille.

Sauriez-vous comment je puisse faire cette action avec une macro?

Je vous remercie d'avance.
 

xUpsilon

XLDnaute Accro
Bonjour,

VB:
Sub duplic()
Application.ScreenUpdating = False
For i = 2 to 52
Worksheets("S (1)").Copy After:=Sheets(Worksheets.Count)
Set MySheet = ActiveSheet
With MySheet
   .Name = "S (" & i & ")"
End With
Next i

Application.ScreenUpdating = True
End Sub

A essayer.

Bonne continuation
 
Dernière édition:

Discussions similaires

Réponses
257
Affichages
7 K

Statistiques des forums

Discussions
315 098
Messages
2 116 193
Membres
112 679
dernier inscrit
Yupanki