Copier le nom d'un onglet [Résolu/Fermé]

Signaler
Messages postés
25
Date d'inscription
lundi 14 mars 2016
Statut
Membre
Dernière intervention
9 juin 2016
-
 cooljuly -
Bonjour,

Je voudrais copier un onglet d'un fichier pour le coller dans un autre tout en copiant également le nom de l'onglet. Je ne trouve pas le code pour copier/coller le nom de l'onglet pouvez vous m'aider ?
Voici mon code :

        Workbooks.Open (Chemin & "\" & DossierDB & "\" & FichierDB), UpdateLinks:=False
Workbooks(FichierDB).Activate
Cells.Select
Selection.Copy
Windows(FichierMacro).Activate
ActiveWindow.ScrollWorkbookTabs Position:=xlLast
Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Paste
ActiveWindow.DisplayGridlines = False
ActiveWindow.Zoom = 85
Application.CutCopyMode = False
Workbooks(FichierDB).Activate
ActiveSheet.Name.Copy
Windows(FichierMacro).Activate
ActiveSheet.Name.Paste


Ca bloque pour la partie en gras...

Merci d'avance,

Nono

1 réponse

bonjour,

moi j'ai Names dans mes classeurs pour cela