OVH Cloud OVH Cloud

En tete et pied de page

2 réponses
Avatar
Jean-Pierre
Bonjour,

Est il possible de mettre des variables dans les En-tête/pied de page ?

Merci pour votre réponse

JPP

2 réponses

Avatar
nospam-Awerel
bonjour
tu peux tout à fait y mettre une variable comme dans le petit programme
ci-dessous

Sub entete()
With ActiveSheet.PageSetup
.CenterHeader = "&""Arial,Gras""&10" & Range("S7").Value & "&9 - " &
mavariable
.CenterFooter = "&P / &N"
.RightFooter = "&D"
End With
End Sub
ou encore en récupérant le contenu d'une cellule Excel comme ci-dessous :

Sub entete()
With ActiveSheet.PageSetup
.CenterHeader = "&""Arial,Gras""&10" & Range("S7").Value & "&9 - " &
Range("AK6").Value
.CenterFooter = "&P / &N"
.RightFooter = "&D"
End With
End Sub

J'espère que cela répond à ta question
@+
Antoine.
"Jean-Pierre" a écrit dans le message de news:
2LjTe.30920$
Bonjour,

Est il possible de mettre des variables dans les En-tête/pied de page ?

Merci pour votre réponse

JPP




Avatar
Jean-Pierre
Super

Merci

JPP

"nospam-Awerel" a écrit dans le message de news:

bonjour
tu peux tout à fait y mettre une variable comme dans le petit programme
ci-dessous

Sub entete()
With ActiveSheet.PageSetup
.CenterHeader = "&""Arial,Gras""&10" & Range("S7").Value & "&9 - "
& mavariable
.CenterFooter = "&P / &N"
.RightFooter = "&D"
End With
End Sub
ou encore en récupérant le contenu d'une cellule Excel comme ci-dessous :

Sub entete()
With ActiveSheet.PageSetup
.CenterHeader = "&""Arial,Gras""&10" & Range("S7").Value & "&9 - "
& Range("AK6").Value
.CenterFooter = "&P / &N"
.RightFooter = "&D"
End With
End Sub

J'espère que cela répond à ta question
@+
Antoine.
"Jean-Pierre" a écrit dans le message de news:
2LjTe.30920$
Bonjour,

Est il possible de mettre des variables dans les En-tête/pied de page ?

Merci pour votre réponse

JPP