Bonjour dams03, Pedro22,
je te propose cette petite adaptation du code VBA de Pedro :
Option Explicit
Sub DupliquerOnglet()
Dim Onglet As Worksheet: On Error Resume Next
Set Onglet = ActiveWorkbook.Worksheets("trame"): Onglet.Copy , Onglet
ActiveSheet.Name = Application.InputBox("Nom de l'onglet", Type:=2)
End Sub
ça évitera de planter si tu saisis un nom de feuille déjà existant, ou non valide :
nom trop long, ou avec des caractères interdits comme le "/"
dhany