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:
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 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.
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 et 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 et 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. (Trucs: 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 plus > 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!EN DIRECT
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.
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!EN DIRECT
Démo: insérer un saut de page toutes les x lignes dans Excel
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.
Dear extendoffice.com
I would like to send feedback about feature: Print > Insert Page Break Every Row.
VBA Code:
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
When you use this function, you can only enter one variables is xRow.
So this feature will be almost useless because it is not flexible. Not all data start from Row 1, not to mention data usually is table and has Header row.
I think this feature should have another variable is xFirstRow, so that you can define the first row of data:
xFirstRow = Application.InputBox("First Row", xTitleId, "", Type:=1)
And the formula should be:
For i = xFirstRow + xRow + 1 To xLastrow Step xRow
Hopefully this feature will be upgraded in later versions.
Thanks,
Tuyen
et 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.
