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

Comment insérer un saut de page toutes les x lignes dans Excel?

Il peut être facile et simple pour vous d'insérer un saut de page dans une feuille de calcul. Parfois, il est nécessaire d'insérer des sauts de page dans toutes les X lignes pour une impression ordonnée, comment pourriez-vous faire? Ici, je présente quelques méthodes pour résoudre ce problème dans Excel.


Insérer un saut de page toutes les X lignes avec VBA dans Excel

Peut-être que vous n'êtes pas familier avec VBA en cours d'exécution auparavant, mais avec les étapes suivantes, vous savez peut-être comment exécuter le VBA pour insérer un saut de page toutes les X lignes. Ici, je vais insérer un saut de page toutes les 3 lignes.

1. presse Alt + F11 pour afficher le Microsoft Visual Basic pour applications fenêtre.

2. Dans la fenêtre, cliquez sur insérer > Module pour afficher une nouvelle fenêtre de module, puis copiez le code VBA suivant dans la fenêtre de module.

VBA: insérez un saut de page dans toutes les X lignes d'une feuille de calcul.

Sub InsertPageBreaks()
'Updateby20140618
Dim xLastrow As Long
Dim xWs As Worksheet
Set xWs = Application.ActiveSheet
xRow = Application.InputBox("Row", xTitleId, "", Type:=1)
xWs.ResetAllPageBreaks
xLastrow = xWs.Range("A1").SpecialCells(xlCellTypeLastCell).Row
For i = xRow + 1 To xLastrow Step xRow
    xWs.HPageBreaks.Add Before:=xWs.Cells(i, 1)
Next
End Sub

3. Cliquez course et une boîte de dialogue apparaît pour vous permettre de spécifier toutes les X lignes dans lesquelles vous souhaitez insérer un saut de page. Ici, j'insère un saut de page toutes les 3 lignes. Voir la capture d'écran:
doc-insert-page-break-x-rows-1

4. Cliquez OK, puis il insérera un saut de page dans toutes les X lignes.

Insérez rapidement un saut de page chaque (nième) ligne dans la feuille de calcul active

Normalement, nous insérons un saut de page en cliquant Mise en page > Pauses > Insérer un saut de page. Mais de cette façon, il est trop fastidieux d'insérer par lots plusieurs sauts de page dans une feuille de calcul, par exemple, vous devez insérer un saut de page chaque ligne pour imprimer chaque ligne dans une page distincte. Ne t'inquiète pas! Kutools pour Excel Insérer un saut de page à chaque ligne L'utilitaire peut vous aider à l'archiver facilement! Essai gratuit complet de 30 jours!
insertion d'annonce saut de page chaque ligne 3

Insertion par lots de sauts de page après toutes les x lignes avec Kutools for Excel

Si Kutools for Excel est installé, son Fractionner en colonnes L'utilitaire peut vous aider à insérer par lots plusieurs sauts de page après toutes les x lignes en conservant facilement le titre de chaque page dans Excel.

Kutools pour Excel - Comprend plus de 300 outils pratiques pour Excel. Essai gratuit complet de 30 jours, aucune carte de crédit requise! Essai gratuit maintenant!

1. Cliquez Fractionner en colonnes sur le Kutools Plus languette.

2. Dans la boîte de dialogue d'ouverture de Split en colonnes, vous devez:

(1) Cliquez sur le bouton Parcourir  à l' Gamme de titres et sélectionnez la ligne de titre dans la plage spécifiée dans laquelle vous insérerez par lots des sauts de page.
(2) Cliquez sur le bouton Parcourir à l' Période et sélectionnez la plage dans laquelle vous allez insérer des sauts de page par lots.
(3) Dans le Lignes par page imprimée , entrez un nombre. (Conseil : Par exemple, si vous devez insérer des sauts de page toutes les 3 lignes, veuillez saisir 3 dans la case; si vous devez inerte les sauts de page après chaque ligne, veuillez entrer 1.)
(4) Entrez 1 dans le Nombre de segments boîte.

3. Clique le Ok .

Vous verrez maintenant que la plage est copiée dans une nouvelle feuille de calcul et que les sauts de page sont ajoutés après toutes les x lignes avec le titre de la plage. Vous pouvez également basculer vers la vue Aperçu des sauts de page en cliquant sur Voir > Aperçu du saut de page pour voir ces sauts de page. Voir la capture d'écran ci-dessous.

Kutools pour Excel - Comprend plus de 300 outils pratiques pour Excel. Essai gratuit complet de 30 jours, aucune carte de crédit requise! Achetez-le Maintenant


Insérer des sauts de page après toutes les x lignes avec Kutools for Excel

Kutools for Excel développe un autre utilitaire Insérer un saut de page à chaque ligne spécialisé dans l'insertion de sauts de page après toutes les x lignes à l'aise.

Kutools pour Excel - Comprend plus de 300 outils pratiques pour Excel. Essai gratuit complet de 30 jours, aucune carte de crédit requise! Essai gratuit maintenant!

1. Sélectionnez la plage dans laquelle vous allez insérer des sauts de page toutes les x lignes, puis cliquez sur Impression > Insérer un saut de page à chaque ligne sur le Kutools Plus languette.

2. Dans la boîte de dialogue d'ouverture Insérer un saut de page à chaque ligne, spécifiez l'intervalle de lignes auquel vous allez insérer des sauts de page, puis cliquez sur le bouton Ok .

Ensuite, vous verrez des sauts de page sont insérés à la fois à l'intervalle de lignes spécifié.

Kutools pour Excel - Comprend plus de 300 outils pratiques pour Excel. Essai gratuit complet de 30 jours, aucune carte de crédit requise! Achetez-le Maintenant


Démo: insérer un saut de page toutes les x lignes dans Excel


Kutools pour Excel comprend plus de 300 outils pratiques pour Excel, gratuits à essayer sans limitation en 30 jours. Téléchargez et essayez gratuitement maintenant!

Articles relatifs:


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ée...
  • 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 gammes...
  • 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 cellules...
  • 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 PDF...
  • 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 (3)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Merci beaucoup d'Istanbul / Turquie :)
Simple
Ce commentaire a été minimisé par le modérateur sur le site
Salut, merci beaucoup pour le code. Mais lorsque j'appuie sur Annuler ou sur x dans la zone de saisie ; le fichier excel plante. Pouvez-vous s'il vous plaît aider à résoudre ce problème.
Emad
Ce commentaire a été minimisé par le modérateur sur le site
cher extendoffice.com
Je souhaite envoyer des commentaires sur la fonctionnalité : Imprimer > Insérer un saut de page à chaque ligne.

Code VBA :
Sous InsertPageBreaks()
'Mise à jour du 20140618
Dim xLastrow As Long
Feuille de travail Dim xWs As
Définir xWs = Application.ActiveSheet
xRow = Application.InputBox("Row", xTitleId, "", Type :=1)
xWs.ResetAllPageBreaks
xLastrow = xWs.Range("A1").SpecialCells(xlCellTypeLastCell).Row
Pour i = xRow + 1 à xLastrow Step xRow
xWs.HPageBreaks.Add Before :=xWs.Cells(i, 1)
Suivant
End Sub


Lorsque vous utilisez cette fonction, vous ne pouvez entrer qu'une seule variable est xRow.
Cette fonctionnalité sera donc presque inutile car elle n'est pas flexible. Toutes les données ne commencent pas à partir de la ligne 1, sans oublier que les données sont généralement des tables et ont une ligne d'en-tête.

Je pense que cette fonctionnalité devrait avoir une autre variable, xFirstRow, afin que vous puissiez définir la première ligne de données :
xFirstRow = Application.InputBox("Première ligne", xTitleId, "", Type :=1)

Et la formule devrait être :
Pour i = xFirstRow + xRow + 1 à xLastrow Step xRow

Espérons que cette fonctionnalité sera mise à jour dans les versions ultérieures.
Merci,
Tuyen
Tuyen
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