Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Bonjour Jean-Pierre
Je ne sais pas si je suis vraiment ou archi NUL mais j'ai recherché ta solution et je n'ai pas de formule qui reprenne le terme "en-tête". Peux tu m'éclairer ?
Merci et bonne journée.
Ortense
Désolé, mais c'était une boutade eu égard à ton premier post...(sans Bonjour, ni merci)
Sont comme cela ici....
Vois le fichier joint.
A mettre dans ThisWorkbook (pour accéder : Alt F11, et dans Projet - VBA Project, tu ouvres par la petite croix ton classeur et tu colles ce code dans la fenêtre à droite.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
With Sheets("Feuil1"😉 ( "Feuil1" ) sans les espaces
.Range("A1"😉 = .PageSetup.CenterHeader ( "A1" )
End With
End Sub
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD