Microsoft 365 Valeur d'une cellule dans l'en-tête d'un feuille

[Scorpio]

Bonjour à tous,
J'ai un code, qui normalement devrais me donner la valeur de la cellule "A1" au centre de l'en-tête de ma feuille, mais,
ce code me donne la valeur a gauche et, je ne trouve pas la solution.
Pourriez-vous s'il vous plaît me donner un petit coup de pouce
Merci, a tout

 

[youky(BJ)]

Bonjour Scorpio,
à rectifier cette ligne comme ceci.
.PageSetup.CenterHeader = Replace(.Range("A1"), "Facture ", "")

Bruno

 

[Scorpio]

Bonjour youky(BJ),
D'abord merci de ton aide,
Mais chez moi cela ne donne rien

 

[youky(BJ)]

La macro est en Worksheet_SelectionChange
Il faut sélectionner A1 pour déclencher la macro
Il serait bon de placer cette macro lors de l'impression
Bruno

 

[Scorpio]

Re Bruno,
A oui, ca y est, cela fonctionne
Merci beaucoup pour l'aide, a 1autre fois.
Scorpio

 

[Scorpio]

Re bonjour Bruno,
J'aurais voulu vous demander, car ce matin j'y est pas pensé:
De mettre la valeur dont on a parlé, dans l'en-tête,
En gras, et en police Century Gothic 12.
Est-ce encore possible, s'il vous plaît, merci beaucoup, a++++

 

[youky(BJ)]

Si cela n'est pas déjà trouvé . . . .
Menu mise en page>Marges>Marges Personnalisées
Entête>Entête personnalisée>Sélectionner "Janvier 2021">et choisir la fonte
A faire une seule fois
Désolé du retard mais j'étais absent
Bruno

 

[Scorpio]

Re bonjour youky(BJ)
Mais oui, j'ai pas pensé, désolé.
Merci youky du conseil, c'est gentil, et à plus.