Bonjour à tous.
J'utilise une macro qui me permet de rédiger une fiche établissement. Pour chaque onglet, je désire insérer en tête de page à gauche le numéro de l'établissement et au centre le nom de l'établissement.
Seulement avec le code suivant, ces en-têtes sont tronqués et je n'arrive pas à savoir pourquoi:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
    Application.PrintCommunication = False
    With ActiveSheet.PageSetup
       .LeftHeader = "&""-,Gras""&14" & "Finess: " & finess
       .CenterHeader = "&""-,Gras""&14" & "Etablissement: " & nom & " "
       .RightHeader = "&""-,Gras""&14" & "DATE: " & Format(Now, "dd/mm/yyyy")
    End With
    Application.PrintCommunication = True
Je ne peux pas diminuer la police sinon, ce n'est pas assez gros lors de l'impression. Et de plus, une fois mon code créé, je peux remplir à la main mon en tête, ce n'est donc pas un problème de place!

Merci pour votre aide!

Erwan Legrand