Discussion :

[Rogeure]

Bonjour,

J'ai écris ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
'Récupération du texte de l'en-tête de la feuille active
Texte = ActiveSheet.PageSetup.CenterHeader

Je récupère bien ce que je souhaite mais par contre ma récupération est précédée de :
&"-,Gras"&16

Et je ne sais pas m'en débarrasser.

Pourriez-vous m'aider ?

Merci et bonne journée

[EricDgn]

Bonjour,

La partie &"-,Gras"&16 correspond au formatage du texte qui suit. Si vous êtes certain qu'il y aura toujours &16 (= taille de la police: 16), alors vous pourriez ajouter cette instruction:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Texte = Mid(Texte, InStr(Texte, "&16") + 3)

Cordialement.

[Rogeure]

Bonjour,

Merci pour votre solution.

Bonne journée et au plaisir