Mettre une en tête commune à différentes pages
Résolu
Bonjour,
Comment mettre une en tête commune à différentes pages excel ?
J'ai trouvé les codes pour les marges, pour l'orientation, (ci dessous) mais pas pour les en têtes...
Comment mettre une en tête commune à différentes pages excel ?
J'ai trouvé les codes pour les marges, pour l'orientation, (ci dessous) mais pas pour les en têtes...
Sub SetAttributes()
For Each xWorksheet In ActiveWorkbook.Worksheets
xWorksheet.PageSetup.Orientation = _
Worksheets("Mise en Page").PageSetup.Orientation
xWorksheet.PageSetup.LeftMargin = _
Worksheets("Mise en Page").PageSetup.LeftMargin
xWorksheet.PageSetup.RightMargin = _
Worksheets("Mise en Page").PageSetup.RightMargin
xWorksheet.PageSetup.TopMargin = _
Worksheets("Mise en Page").PageSetup.TopMargin
xWorksheet.PageSetup.BottomMargin = _
Worksheets("Mise en Page").PageSetup.BottomMargin
Next xWorksheet
End Sub
2 réponses
-
Bonjour Camille, bonjour le forum,
L'enregistreur de macro est un excellent outil quand on est bloqué. Lance-le, crée l'en-tête. Arrête-le et regarde le code. Certes, il y a du superflu ! Mais il ne te reste plus qu'à en extraire la partie adéquate (comme Sheila) et à l'inclure dans ton code actuel...
-
Re,
Comment fais-tu pour créer une nouvelle macro ?
-
-
Utilise le raccourci clavier [Alt] + [O] + [M] + [E] ou dans l'onglet Développeur clique sur le bouton Enregistrer une macro.
Donne-lui un nom pour la retrouver facilement ou garde le nom par défaut : Macro1. Clique sur le bouton OK. En bas à gauche dans la barre de tâche tu verras un carré bleu...
Modifie maintenant l'en-tête d'un onglet avec l'onglet Mise en page. Quand tu as fini clique dans le carré bleu pour arrêter l'enregistreur de macro.
Tu pourras retourner dans le code et en extraire ce qui t'intéresse... -
-
