Note: The other languages of the website are Google-translated. Back to English

Comment insérer le numéro de page dans la cellule / en-tête / pied de page dans Excel?

Lorsque vous imprimez un fichier Excel, vous devrez peut-être insérer les numéros de page dans les pages pour rendre le fichier imprimé proprement et lisible. Dans cet article, je présenterai quelques astuces rapides pour insérer les numéros de page dans la cellule, l'en-tête ou le pied de page pour vous.

Insérer le numéro de page dans l'en-tête / pied de page dans une feuille de calcul

Insérer le numéro de page dans l'en-tête / pied de page sur plusieurs feuilles de calcul

Insérer le numéro de page dans la cellule avec le code VBA

Supprimer tous les numéros de page à la fois dans Excel


flèche bleue bulle droite Insérer le numéro de page dans l'en-tête / pied de page dans une feuille de calcul

Normalement, nous pouvons insérer rapidement les numéros de page dans l'en-tête ou le pied de page en utilisant le En-tête et pied de page fonction, procédez comme suit:

1. Accédez à la feuille de calcul dont vous souhaitez insérer les numéros de page dans l'en-tête ou le pied de page.

2. Puis clique insérer > En-tête et pied de page, et votre feuille de calcul sera en Mise en page vue, voir capture d'écran:

doc insérer les numéros de page 1

3. Cliquez sur l'en-tête ou le pied de page à l'endroit où vous souhaitez insérer le numéro de page, puis sur un Efficace onglet avec Outils d'en-tête et de pied de page s'affiche dans le ruban, puis cliquez sur Efficace > Numéro de page, voir capture d'écran:

doc insérer les numéros de page 2

4. Et vous pouvez voir l'espace réservé &[Page] apparaissent dans la section sélectionnée, puis cliquez n'importe où en dehors de la zone d'en-tête ou de pied de page pour afficher les numéros de page. Voir la capture d'écran:

doc insérer les numéros de page 3

5. Vous pouvez maintenant revenir à la vue normale en cliquant sur Voir > Normalet lorsque vous imprimez cette feuille de calcul, vous verrez que les numéros de page ont été insérés dans l'en-tête ou le pied de page que vous avez sélectionné.

Notes: Si vous voulez que les numéros de page s'affichent au format 1 sur 15, 2 sur 15, il vous suffit de saisir directement ce & [Page] sur & [Pages] dans la zone de champ d'en-tête ou de pied de page, voir capture d'écran:

doc insérer les numéros de page 4


flèche bleue bulle droite Insérer le numéro de page dans l'en-tête / pied de page sur plusieurs feuilles de calcul

La méthode ci-dessus peut vous aider à insérer les numéros de page dans une feuille de calcul, si vous souhaitez insérer les numéros de page dans toutes les feuilles de calcul du classeur pour que toutes les pages soient numérotées dans un ordre séquentiel, procédez comme suit:

1. Sélectionnez tous les onglets de la feuille, puis accédez à Mise en page onglet, et cliquez Bouton de lancement de la boîte de dialogue icône dans le Mise en page groupe, voir capture d'écran:

doc insérer les numéros de page 5

2. Dans le Mise en page boîte de dialogue, veuillez cliquer En-tête / pied de page onglet, puis cliquez sur En-tête personnalisé or Pied de page personnalisé pour aller à définir l'en-tête ou le pied de page que vous voulez, voir capture d'écran:

doc insérer les numéros de page 6

3. Et dans le En-tête or Pied de page boîte de dialogue, veuillez définir l'emplacement où les numéros de page sont insérés en cliquant à l'intérieur du Section de gauche:, Section centrale:ou Section droite: boîte selon vos besoins, puis cliquez sur Insérer un numéro de page icône et espace réservé &[Page] apparaît. Voir la capture d'écran:

doc insérer les numéros de page 7

Remarque : Entrez ceci & [Page] sur & [Pages] dans le champ d'en-tête ou de pied de page si vous aimez les numéros de page affichés comme 1 sur 45, 2 sur 45…

4. Puis clique OK > OK pour fermer les boîtes de dialogue, lorsque vous imprimez ce classeur, dans l'aperçu avant impression, vous pouvez voir que tous les numéros de page sont insérés dans l'en-tête ou le pied de page dans un ordre séquentiel.


flèche bleue bulle droite Insérer le numéro de page dans la cellule avec le code VBA

Il est facile pour vous d'insérer les numéros de page dans l'en-tête ou le pied de page, mais, si vous devez insérer les numéros de page dans une cellule de feuille de calcul, il n'y a aucun moyen direct pour vous de le faire. Le code VBA suivant peut vous aider à résoudre ce problème.

1. Cliquez sur une cellule dans laquelle vous souhaitez afficher le numéro de page de cette cellule.

2. Maintenez le ALT + F11 clés, et il ouvre le Microsoft Visual Basic pour applications fenêtre.

3Cliquez sur insérer > Moduleet collez le code suivant dans le Module Fenêtre.

Code VBA: insérer le numéro de page actuel dans une cellule:

Sub pagenumber()
'updateby Extendoffice 20160506
    Dim xVPC As Integer
    Dim xHPC As Integer
    Dim xVPB As VPageBreak
    Dim xHPB As HPageBreak
    Dim xNumPage As Integer
    xHPC = 1
    xVPC = 1
    If ActiveSheet.PageSetup.Order = xlDownThenOver Then
        xHPC = ActiveSheet.HPageBreaks.Count + 1
    Else
        xVPC = ActiveSheet.VPageBreaks.Count + 1
    End If
    xNumPage = 1
    For Each xVPB In ActiveSheet.VPageBreaks
        If xVPB.Location.Column > ActiveCell.Column Then Exit For
        xNumPage = xNumPage + xHPC
    Next
    For Each xHPB In ActiveSheet.HPageBreaks
        If xHPB.Location.Row > ActiveCell.Row Then Exit For
        xNumPage = xNumPage + xVPC
    Next
    ActiveCell = "Page " & xNumPage & " of " & Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
End Sub

4. Puis appuyez F5 clé pour exécuter ce code, et le numéro de page de cette cellule est affiché dans la cellule sélectionnée, voir capture d'écran:

doc insérer les numéros de page 8


flèche bleue bulle droite Supprimer tous les numéros de page à la fois dans Excel

Pour supprimer tous les numéros de page, vous pouvez appliquer les étapes suivantes:

1. Sélectionnez tous les onglets de la feuille et accédez à la Mise en page sur le ruban, puis cliquez sur Bouton de lancement de la boîte de dialogue icône dans le Mise en page groupe, voir capture d'écran:

doc insérer les numéros de page 9

2. Dans le Mise en page boîte de dialogue, cliquez sur En-tête / pied de page onglet, puis choisissez (Aucun) du En-tête or Pied de page liste déroulante, voir capture d'écran:

doc insérer les numéros de page 10

3. Puis clique OK bouton, tous les numéros de page sont supprimés du classeur à la fois.


Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtréeplus
  • Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammesplus
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellulesplus
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDFplus
  • Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.
onglet kte 201905

Office Tab apporte une interface à onglets à Office et simplifie considérablement votre travail

  • Activer 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 réduit des centaines de clics de souris chaque jour!
bas de cabine

 

Commentaires (6)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour, j'ai utilisé le numéro de page Insérer dans la cellule avec le code VBA ci-dessus et cela fonctionne à merveille. Ma feuille peut être longue de 2 pages (2 vers le bas et 1 en travers), de 4 pages (2 en bas et 2 en travers) ou de 6 pages (2 en bas et 3 en travers). J'ai inséré le code dans chaque cellule des 6 qui nécessitent l'impression d'un numéro de page (en sélectionnant les cellules chacune à son tour et en exécutant le VBA), les adresses de cellule sont H1, H35, T1, T35, AF1, AF35. Maintenant, je voudrais ajouter un bouton pour actualiser ces numéros de page sans affecter la cellule qui peut être active lorsque l'utilisateur concerné peut choisir de l'exécuter, actuellement je dois sélectionner à nouveau chaque cellule à tour de rôle et exécuter le VBA :( L'assistance serait énormément apprécié ! Antoinette
Ce commentaire a été minimisé par le modérateur sur le site
J'ai essayé la macro VBA, mais j'obtiens une erreur d'indice hors plage... Ai-je fait quelque chose de mal ?
Ce commentaire a été minimisé par le modérateur sur le site
Hola, hay un error en la formula porque cuando ejecuto (F5) el primer valor numérico de "Pagina XX de XX" no cambia. Solo hace el conteo de páginas el segundo valor. Révision podrienne... Gracias
Ce commentaire a été minimisé par le modérateur sur le site
terima kasih, kawan
Ce commentaire a été minimisé par le modérateur sur le site
Puis-je savoir si j'ai une plage de cellules que je veux mettre dans les numéros de page, que dois-je changer ? Le VBA actuel ne me permet de changer qu'un par un.
Ce commentaire a été minimisé par le modérateur sur le site
Puis-je savoir comment je dois modifier ci-dessus VBA qui me permet d'exécuter ceci sur une plage de cellules sur un classeur et avec 1 touche de raccourci pour appliquer toutes les cellules sélectionnées?
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0   Personnages
Emplacements suggérés