En-tete personnalisé

[pad01]

Bonjour le Forum,
J'aurai besoin de mettre une en-tete en récupérant le contenu de deux cellules.
Est-ce possible et comment ?
Merci pour votre aide

 

[DoubleZero]

Re : En-tete personnalisé

Bonjour, pad01, le Forum,

Une façon de procéder :

Sub En_tête()
With Sheets("Feuil1")
    .PageSetup.CenterHeader = Sheets("Feuil2").Range("a1").Value & Sheets("Feuil2").Range("a2").Value
End With
End Sub

A bientôt

 

[pad01]

Re : En-tete personnalisé

Bonjour Le Forum, DoubleZero
Merci DoubleZero pour le code vba. Adapté cela fonctionne bien.
A priori, il n'y a pas d'autre solution que de passer par le vba.
A+

 

[DoubleZero]

Re : En-tete personnalisé

Re-bonjour,

...A priori, il n'y a pas d'autre solution que de passer par le vba...

J'en ai bien peur !

A bientôt