meme entete sur tous les onglets

[Gasp]

Bonsoir a tous,

je souhaite mettre le meme entete et le meme pieds de page, tous les deux personnalisés, sur les 8 onglets de mon classeur Excel.
Connaissez-vous une methode un peu automatique ? (a part refaire a la main a chaque fois)
D'avance merci !
A+

 

[michel]

bonsoir

tu peux tester cette macro


Sub insertPageSetUp()
Dim Valeur1 As String, Valeur2 As String
Dim Nom As Byte

Valeur1 = "le forum xld"
Valeur2 = "essai"

For Nom = 1 To Sheets.Count
With ActiveWorkbook.Sheets(Nom)
.PageSetup.LeftFooter = Valeur1
.PageSetup.LeftHeader = Valeur2
End With
Next

End Sub


Pour la section centrale du bas de page , utilise : CenterFooter
Pour la section de droite du bas de page , utilise : RightFooter
…etc…


bonne soirée
MichelXld

 

[Jacques]

Salut,

Selectionne tous tes onglets à l'aide la touche contrôle ou la touche Maj (groupe de travail) ensuite tout ce que tu fera dans une cellule ou sur les entêtes et pied de page ou autre se dupliquera sur toute les pages.
Pour sortir du groupe de travail clique sur l'un ou l'autre des onglets

Bonne soirée.

Jacques