KutoolsforOffice — Une solution unique, cinq outils puissants.Faire plus avec moins d'efforts.Soldes de mars : 20 % de réduction

Comment appliquer des en-têtes ou des pieds de page différents sur chaque page d’une feuille Excel ?

AuteurSiluvia Date de modification

Par défaut, lorsque vous ajoutez un en-tête ou un pied de page à une feuille Excel, ce contenu s’applique de manière identique sur toutes les pages imprimées. Ce comportement standard garantit une cohérence pratique, mais il arrive que vous souhaitiez afficher des informations différentes d’une page à l’autre. Par exemple, lors de l’impression de rapports financiers, de listes d’étudiants ou de formulaires composés de plusieurs sections, un en-tête ou un pied de page spécifique à chaque page améliore la clarté du document et permet de distinguer facilement les différentes parties. Cependant, les outils natifs d’Excel ne permettent de définir qu’un seul en-tête et un seul pied de page pour l’ensemble du document, limitant ainsi la flexibilité sans recourir à des méthodes avancées. Découvrons ensemble comment attribuer des en-têtes ou pieds de page uniques à chaque page de votre feuille Excel.

Appliquer des en-têtes ou pieds de page différents sur chaque page à l’aide d’un code VBA


Appliquer des en-têtes ou pieds de page différents sur chaque page à l’aide d’un code VBA

La solution ci-dessous utilise une macro VBA pour attribuer des en-têtes ou pieds de page spécifiques à chaque page imprimée. Cette méthode est utile si chaque section de votre document (comme des chapitres, des classes ou des rapports mensuels) nécessite un identifiant unique. Bien que cette approche implique une configuration initiale, une fois mise en place, elle permet d’imprimer rapidement diverses sections avec des contenus d’en-tête ou de pied de page distincts.

1. Appuyez simultanément sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Dans la fenêtre Microsoft Visual Basic pour Applications, cliquez sur Insertion > Module. Copiez ensuite le code VBA ci-dessous et collez-le dans la fenêtre Code. Si vous débutez avec les macros, sachez que les modules sont les sections où le code VBA est stocké pour être exécuté. Reportez-vous à la capture d’écran pour vous guider :

Code VBA : appliquer des en-têtes différents sur chaque page dans Excel

Sub DifferentHeaderFooter()
    Dim ws As Worksheet
    Dim vLeft As Variant, vRight As Variant, xRg As Variant
    Set ws = ActiveSheet
    On Error Resume Next
    vLeft = Array("First page", "Second page", "Third page", "fourth page")
    xRg = Array("A1:C50", "A51:C100", "A101:C150", "A151:C200")

    Application.ScreenUpdating = False
    For i = 0 To UBound(vLeft)
        With ws.PageSetup
        .PrintArea = xRg(i)
        .LeftHeader = vLeft(i)
        End With
        ws.PrintPreview
    Next i
    Application.ScreenUpdating = True
    ws.PageSetup.PrintArea = ""
End Sub

copiez et collez le code dans le module

Remarques et explications des paramètres :

1. Dans le code VBA, modifiez la section vLeft = Array(«[[PH_2]]», «Second page», «Third page», «fourth page»)pour définir le texte de l’en-tête ou du pied de page de chaque page. Chaque élément du tableau représente le contenu d’une seule page et doit correspondre aux Zone d'impression ci-dessous.
2. Dans la section xRg = Array("A1:C50", "A51:C100", "A101:C150", "A151:C200"), définissez la plage de cellules pour chaque page imprimée. Assurez-vous que ces plages correspondent exactement aux sections de votre feuille que vous souhaitez imprimer et qu’elles ne se chevauchent pas. Vous pouvez adapter les références de cellules en fonction de la disposition réelle de vos données, et ajouter ou supprimer des sections selon le nombre de pages souhaité.
3. Si vous préférez utiliser des pieds de pageplutôt que des en-têtes, remplacez simplement Headerpar Footerdans tout le code. Cela peut s’avérer utile pour insérer des numéros de page, des mentions de non-responsabilité ou des informations juridiques spécifiques à chaque section.
4. Pour obtenir des résultats optimaux, assurez-vous que la mise en page de votre feuille à imprimer correspond aux plages définies dans le code, et vérifiez toujours l’aperçu avant impression avant de finaliser la sortie.

3. Appuyez sur la touche F5 pour exécuter la macro. Le code se lance alors et affiche la fenêtre Aperçu. Cliquez ensuite sur le bouton Imprimer pour imprimer chaque section avec son en-tête ou son pied de page spécifique.

Remarque : Si votre feuille comporte 4 zones d’impression spécifiées, vous devrez cliquer quatre fois sur le bouton Imprimer — une fois par section — afin d’imprimer l’ensemble des pages avec leurs en-têtes et pieds de page individuels. En effet, la macro imprime chaque section séquentiellement ; répétez donc l’action d’impression pour chacune d’elles.

En résumé, même si Excel ne prend pas en charge nativement des en-têtes ou pieds de page uniques pour chaque page au sein d’une même feuille, les macros VBA offrent une solution à la fois pratique et hautement personnalisable. Veillez toujours à vérifier vos paramètres ainsi que le résultat imprimé, et envisagez des solutions alternatives pour les cas plus complexes. Si vous avez souvent besoin de personnaliser vos impressions, investir un peu de temps pour automatiser ce processus avec VBA peut vous faire gagner énormément de temps.

une capture d’écran de kutools for excel ia

Libérez la magie d’Excel avec Kutools IA

  • Exécution intelligente : effectuez des opérations sur les cellules, analysez des données et créez des graphiques, le tout à partir de commandes simples.
  • formules personnalisées : créez des formules sur mesure pour rationaliser vos flux de travail.
  • Programmation VBA : Écrivez et implémentez du code VBA en toute simplicité.
  • Interprétation de formules : Décryptez facilement les formules complexes.
  • Traduction de texte : Franchissez les barrières linguistiques directement depuis vos feuilles de calcul.
Améliorez vos capacités Excel grâce à des outils alimentés par l’intelligence artificielle.Téléchargez dès maintenantet découvrez une efficacité inégalée !

Meilleurs outils de productivité Office

🤖Kutools IA Aide: Révolutionnez Analyse des données grâce à :Exécution intelligente   |  Générez du code|  Créez formules personnalisées  |  Analysez des données et générez des graphiques|  Appelez Fonctions améliorées
Fonctionnalités populaires:Rechercher, mettre en surbrillance ou Marquer les doublons   |  Supprimer les lignes vides   |  Combinez les colonnes ou cellules sans perdre de données   |   Arrondi sans utiliser de formule...
Super RECHERCHEV:RechercheValeurs avec critères multiples  |  RechercheValeurs avec valeurs multiples  |   RechercheValeurs dans plusieurs feuilles   |   Correspondance floue....
Liste déroulante avancée:Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple....
Gestionnaire de colonnes:Ajouter un nombre précis de colonnes|Déplacer des colonnes|Basculer la visibilité des colonnes masquées|Comparer des plages et des colonnes...
Fonctionnalités vedettes:Mise au point de la grille   |  Vue de conception   |Barre de formule améliorée   | Gestionnaire de classeurs et de feuilles   |  Bibliothèque de ressources(Texte automatique)|  Sélecteur de date   |  Consolider les feuilles de calcul  |  Chiffrer/Déchiffrer les cellules   | Envoyer des e-mails par liste   |  Super Filtre   |   Filtre spécial(Filtrer les cellules avec une police en gras/italique/barré...) ...
… et bien plus encore… et plus encore:(,)Supprimer des caractères spécifiques, ...)|   50+Typesde graphiques(, ...)|   40+ Formules pratiques(Calculer l'âge en fonction de la date de naissance, ...)|   19 Outils d’insertion(,Insérer une image depuis un chemin , ...)|   de conversion (Convertir en mots,Conversion de devises, ...)|Fusionner et scinder   (Fusion avancée des lignes,Diviser les cellules , ...)|, ...)   |
Utilisez Kutools dans la langue de votre choix – disponible en anglais, espagnol, allemand, français, chinois et 40+ autres langues !

Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...


Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile

  • Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !

Tous les compléments Kutools. Un seul installateur

Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.

ExcelWordOutlookTabsPowerPoint
  • Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
  • Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
  • Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
  • Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
  • Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels