Problème texte gras/normal

Bonjour à tous, j'ai un petit soucis au niveau de la mise en forme d'un texte.

Je modifie l’entête via une formule, mais j'aimerais que la réponse soit en "Normal" et l'intitulé de cette réponse soit en "Gras".

Voici mon code :

Sub entete()

Dim rep_zone As String

rep_zone = InputBox("Saisir la ZONE de travail")

ActiveSheet.PageSetup.CenterHeader = "&""Calibri,Gras""ZONE : " & rep_zone

End Sub

Toute la ligne est en gras, j'ai alors essayer :

ActiveSheet.PageSetup.CenterHeader = "&""Calibri,Gras""ZONE : " & "&""Calibri,Normal" rep_zone

Mais je bute sur une erreur "Attendu : fin d'instruction".

Cordialement

Bonjour Fred,

essaye ce code VBA :

Sub entete()
  Dim rep_zone$: rep_zone = InputBox("Saisir la ZONE de travail")
  ActiveSheet.PageSetup.CenterHeader = "&""Calibri,Gras""ZONE :&""Calibri,Normal"" " & rep_zone
End Sub

dhany

Super, ça marche ! Merci

merci pour ton retour, et pour avoir passé le sujet en résolu !

bonne continuation !

dhany