Hoe voegt u voorwaardelijk een pagina-einde in Excel in?
Bij het werken met grote datasets in Excel wilt u gedrukte rapporten soms zo organiseren dat er automatisch een nieuwe pagina begint telkens wanneer de waarde in een opgegeven kolom verandert. Stel bijvoorbeeld dat kolom A categorieën bevat — dan is het handig als elke categorie op een nieuwe gedrukte pagina begint, zoals in de onderstaande schermafbeelding wordt geïllustreerd. Hoewel Excel u handmatig pagina-einden laat invoegen, kan dit bij grote of vaak bijgewerkte datasets tijdrovend en foutgevoelig zijn. Gelukkig zijn er verschillende efficiënte methoden om dit proces te automatiseren, zodat u tijd bespaart en fouten voorkomt.
Subtotaalfunctie gebruiken om Pagina-einde in te voegen
VBA-code gebruiken om Pagina-einde in te voegen
Markeer wijzigingen in kolom om Pagina-einde in te voegen wanneer gegevens veranderen
Voeg paginascheidingen in om de andere rij om Pagina-einde in te voegen in elke n-de rij
Alternatieve formuleoplossing voor voorwaardelijke Pagina-einde
Subtotaalfunctie gebruiken om Pagina-einde in te voegen
De subtotaalfunctie van Excel wordt veel gebruikt voor het samenvatten van gegroepeerde gegevens en zorgt er automatisch voor dat pagina-einden worden ingevoegd telkens wanneer de waarde in een geselecteerde kolom verandert. Deze methode is ideaal als uw gegevens al zijn gesorteerd op de kolom waarmee u wilt groeperen, zoals klantnaam of regiocode. Zo voegt u efficiënt pagina-einden tussen groepen in, wat het opstellen en afdrukken van rapporten aanzienlijk stroomlijnt.
Zorg ervoor dat uw gegevens correct zijn gesorteerd op de doelkolom voordat u begint, aangezien Subtotaal een pagina-einde plaatst bij elke groepswijziging—afwijkingen kunnen onverwachte onderbrekingen veroorzaken.
1. Selecteer het gegevensbereik waarin u een pagina-einde wilt invoegen. Ga naar het Gegevens-tabblad en klik op Subtotaal.
2. In het dialoogvenster Subtotaalkiest u de doelkolom voor „Bij elke wijziging in” (bijvoorbeeld kolom A als dat uw sleutelveld is), selecteert u een geschikte samenvattingsfunctie (zoals)Som,Aantal, enzovoort) en zorgt u ervoor dat de optie Pagina-einde tussen groepen is ingeschakeld. U kunt ook andere beschikbare opties naar wens aan- of uitzetten.
3. Klik op OK om de subtotalen toe te passen en een pagina-einde in te voegen. U ziet dan dat uw gegevens gegroepeerd zijn en dat automatisch een pagina-einde wordt ingevoegd bij elke wijziging in de geselecteerde kolom.
Praktische tips:
- Gebruik deze methode wanneer u groepssamenvattingen afzonderlijk wilt afdrukken of wanneer u groepsgerichte afdrukken nodig hebt.
- Deze optie is ideaal voor gegevens die al zijn gesorteerd op de doelkolom; anders kunnen onderbrekingen op onverwachte plaatsen terechtkomen.
- Als u de ingevoegde groeperingen en onderbrekingen later wilt verwijderen, gaat u eenvoudigweg naar het Gegevens-tabblad, kiest u opnieuw Subtotaal en klikt u op Alles verwijderen.
- Als de pagina-einden niet staan waar u ze verwacht, controleer dan of uw gegevens correct zijn gesorteerd.
- Subtotalen voegen samenvattingsrijen toe; wilt u die vermijden, dan kunt u overwegen de onderstaande VBA-methode te gebruiken.
VBA-code gebruiken om Pagina-einde in te voegen
Als u een pagina-einde wilt invoegen op basis van een wijziging in kolomwaarden, zonder uw gegevens te groeperen of subtotaal- en samenvattingskolommen toe te voegen, dan is VBA een praktisch alternatief. VBA biedt flexibiliteit voor aangepaste voorwaarden en werkt naadloos met ongesorteerde gegevens.
Sla uw werkmap op voordat u de VBA-code uitvoert, om onbedoeld gegevensverlies te voorkomen. Zorg er ook voor dat macro’s zijn ingeschakeld in de instellingen van uw Excel-toepassing.
1. Druk op Alt + F11 om het venster van de Microsoft Visual Basic for Applications-editor te openen.
2. Klik in de VBA-editor op Invoegen > Module om een nieuwe module toe te voegen en kopieer vervolgens de volgende code naar het modulevenster.
VBA: Pagina-einde invoegen wanneer gegevens veranderen
Sub PageBreak()
'UpdatebyExtendOffice20181101
Dim xSRg As Range
Dim xRg As Range
On Error Resume Next
Set xSRg = Application.InputBox("Select key column:", "Kutools for Excel", xTxt, , , , , 8)
If xSRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
For Each xRg In xSRg
ActiveSheet.Rows(xRg.Row).PageBreak = xlPageBreakNone
If xRg.Value <> xRg.Offset(-1, 0).Value Then
ActiveSheet.Rows(xRg.Row).PageBreak = xlPageBreakManual
End If
Next xRg
Application.ScreenUpdating = True
End Sub3. Druk op F5 om de code uit te voeren. Er verschijnt dan een dialoogvenster waarin u wordt gevraagd de sleutelkolom te selecteren. Kies de kolom waarbij een pagina-einde moet worden ingevoegd wanneer de waarden veranderen.
4. Klik op OK. De code voegt automatisch een pagina-einde in op de juiste posities, op basis van wijzigingen in de gekozen kolom.
Praktische tips:
- Ideaal voor gevorderde gebruikers met specifieke vereisten voor pagina-einden.
- Deze methode past uw gegevensstructuur niet aan en voegt geen subtotaalrijen toe.
- Als u de melding 'macro uitgeschakeld' ontvangt, schakelt u macro's in via Bestand > Opties > Vertrouwenscentrum.
- Als er geen pagina-einde wordt ingevoegd, zorg er dan voor dat u de juiste sleutelkolom selecteert en controleer op samengevoegde cellen, aangezien VBA deze mogelijk overslaat.
- Vergeet niet uw werkmap op te slaan voordat u de code uitvoert, want VBA-acties kunnen niet ongedaan worden gemaakt.
Markeer wijzigingen in kolom om Pagina-einde in te voegen wanneer gegevens veranderen
Voor gebruikers die een grafische interface en meer opties prefereren, biedt de functie Kutools voor Excel’s Markeer wijzigingen in kolom de mogelijkheid om automatisch pagina-einden, lege rijen, randen of kleurmarkeringen in te voegen op basis van wijzigingen in opgegeven kolomwaarden. Deze aanpak is met name nuttig bij gestructureerde rapporten, facturen of formulieren waar visuele scheiding essentieel is.
Na installatie van Kutools voor Excel, gaat u als volgt te werk:（Gratis downloaden Kutools voor Excel nu!)
Klik op Kutools > Opmaak > Markeer wijzigingen in kolom.
2. Configureer in het dialoogvenster Markeer wijzigingen in kolom de instellingen als volgt:
1) Klik op het selectiepictogram 
in het gedeelte Bereik en selecteer het bereik van uw gegevens, exclusief koptekstrijen.
2) Klik op het selectiepictogram in het gedeelte Sleutelkolomen kies de kolom waarop het pagina-einde moet worden gebaseerd (exclusief kopteksten).
3) Selecteer Pagina-einde in het gedeelte Opties. Aanvullende opties, zoals het invoegen van lege rijen of het wijzigen van de achtergrondkleur, zijn eveneens beschikbaar voor verdere aanpassing.
3. Klik op Ok.
Pagina-einden worden nu automatisch ingevoegd bij elke wijziging in de opgegeven kolom binnen het geselecteerde bereik.
Voordelen:
- Eenvoudig te gebruiken grafische interface — geen formules of code nodig.
- Biedt flexibele opmaakopties die verder reiken dan alleen Pagina-einde.
- Vooral handig voor rapporten die een duidelijke visuele scheiding nodig hebben wanneer gegevens veranderen.
- Als uw werkmap beveiligde werkbladen bevat, moet u deze mogelijk tijdelijk deblokkeren voordat u de functie toepast.
Voeg paginascheidingen in om de andere rij om Pagina-einde in te voegen in elke n-de rij
In sommige scenario’s wilt u mogelijk op regelmatige intervallen een pagina-einde invoegen — bijvoorbeeld na elke 2 of 5 rijen — ongeacht de werkelijke waarden in uw dataset. Dit is vooral handig bij het opstellen van formulieren, ticketlijsten of vouchers die in gelijke batches moeten worden afgedrukt. Met de functie van Kutools voor Excel Voeg paginascheidingen in om de andere rij kunt u dit snel realiseren, zonder handmatig elke sectie in te voegen.
Na installatie van Kutools voor Excel, gaat u als volgt te werk:（Gratis downloaden Kutools voor Excel nu!)
1. Selecteer de gegevens waarop u paginascheidingen wilt toepassen en klik op KUTOOLS PLUS > Afdrukken > Voeg paginascheidingen in om de andere rij.
2. Geef in het dialoogvenster Voeg paginascheidingen in om de andere rij het interval op (voer bijvoorbeeld "2" in om elke 2 rijen een pagina-einde in te voegen).
3. Klik op OK(en nogmaals op)OK als daarom wordt gevraagd); het pagina-einde wordt dan ingevoegd met het door u ingestelde interval.
Toepasselijke scenario’s:
- Ideaal voor toepassingen waarbij pagina-einden op vaste intervallen nodig zijn, zoals batchafdrukken of herhalende formulieren.
- Snel en eenvoudig voor elke vaste intervalinstelling, onafhankelijk van gegevenswijzigingen.
- Minder flexibel als u onderbrekingen nodig hebt op basis van specifieke waarden — gebruik dan de bovenstaande methoden voor conditionele onderbrekingen.
Elke N-de rij een Pagina-einde invoegen
Alternatieve formuleoplossing voor conditionele Pagina-einde
Hoewel er geen directe Excel-formule bestaat om fysiek een pagina-einde in te voegen, kunt u formules gebruiken om veranderingen in een kolom te detecteren. Op basis daarvan kunt u aangeven waar handmatig pagina-einden moeten worden ingevoegd of visueel gemarkeerd. Deze aanpak is ideaal voor puur visuele scheiding of wanneer u de afdruklogica doorgeeft aan een ander proces.
1. Voer in een hulpkolom (bijvoorbeeld kolom B, te beginnen bij cel B2) de volgende formule in om elke wijziging in kolom A te markeren:
=IF(A2<>A1,"Page Break","")2. Druk op Enter en sleep de formule omlaag om deze toe te passen op andere rijen in de hulpkolom. Waar „Pagina-einde” verschijnt, kunt u handmatig een fysiek pagina-einde invoegen (ga naar)Pagina-indeling > Onderbrekingen > Pagina-einde invoegen indien nodig).
Tips:
- U kunt de hulpkolom filteren of voorwaardelijk opmaken om gemakkelijk te markeren of te vinden waar pagina-einden geplaatst moeten worden.
- Deze methode is ideaal voor visuele controle of semi-geautomatiseerd pagina-eindebeheer.
Ongeacht de methode die u kiest, controleer uw werkblad altijd in de Pagina-einde-voorvertoning (Tabblad Weergave > Pagina-einde-voorvertoning) om het pagina-einde te bevestigen vóór het afdrukken. Als u extra of ontbrekende onderbrekingen ziet, controleer dan de sortering van uw gegevens en de instellingen voor onderbrekingen. U kunt gerust verschillende methoden uitproberen, afhankelijk van uw workflow en rapportagebehoeften.
Als u fouten tegenkomt—bijvoorbeeld dat andere opties voor Kutools niet verschijnen of code niet wordt uitgevoerd—controleer dan uw Excel-invoegtoepassingen en macro-instellingen. Blijven de problemen aanhouden? Start Excel dan opnieuw op of raadpleeg de desbetreffende sectie voor probleemoplossing hierboven.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins