Hoe drukt u in Excel alleen de oneven of even pagina’s af?
Het afdialoogvenster van Excel biedt echter geen eenvoudige manier om alleen oneven of alleen even pagina’s af te drukken, wat onhandig kan zijn in verschillende kantoor- of data-rapportagescenario’s waarin u specifieke pagina’s uit een lang werkblad moet controleren, verspreiden of archiveren.
Dit artikel biedt twee effectieve oplossingen voor deze beperking in Excel. U vindt zowel een VBA-macro voor het afdrukken van oneven of even pagina’s als een flexibelere aanpak met Kutools voor Excel, zodat u de methode kunt kiezen die het beste past bij uw behoeften en technische vaardigheden.
Alleen oneven of even pagina’s afdrukken met macrocode
Oneven, even of specifieke pagina’s afdrukken zoals u wilt met Kutools voor Excel
Alternatieve oplossing: Handmatig oneven of even pagina’s afdrukken via het afdialoogvenster
Alleen oneven of even pagina’s afdrukken met macrocode
In Excel ontbreken in de afdrukinterface directe opties om oneven of even pagina’s te selecteren, maar u kunt dit eenvoudig realiseren met een VBA-macro. Deze methode is ideaal als u comfortabel bent met het uitvoeren van eenvoudige code en een oplossing zoekt zonder externe hulpmiddelen. Ze is vooral handig voor eenmalige taken of voor gebruikers die zelden complex afdrukbeheer nodig hebben.
Zorg er van tevoren voor dat uw werkblad is ingesteld voor afdrukken en controleer in Afdrukvoorbeeld hoeveel pagina’s worden gegenereerd. Zo voorkomt u blanco of onnodige afdrukken door onverwachte pagina-einden.
1. Open het werkblad dat u wilt afdrukken en druk op Alt + F11 om de Microsoft Visual Basic for Applications (VBA)-editor te openen.
2. Klik in de VBA-editor op Invoegen > Module om een nieuwe module in te voegen en plak de volgende code in het scriptvenster. Raadpleeg de schermafbeelding als hulp.
VBA: Alleen oneven of even pagina’s afdrukken
Sub Odd_Even_Print()
'UpdatebyExtendoffice20160901
Dim xTotalPages As Long
Dim xStartPage As String
Dim xPage As Integer, xYesorNo
Application.ScreenUpdating = False
xStartPage = InputBox("Enter 1 for Odd, 2 for Even", "Kutools for Excel")
If xStartPage = "" Then Exit Sub
xTotalPages = ActiveSheet.PageSetup.Pages.Count
xYesorNo = MsgBox("Are you sure to print?", vbYesNo, "Kutools for Excel")
If xYesorNo = vbYes Then
For xPage = Int(xStartPage) To xTotalPages Step 2
ActiveSheet.PrintOut from:=xPage, To:=xPage
Next
Else
Exit Sub
End If
Application.ScreenUpdating = True
End Sub
Zorg ervoor dat u, bij het kopiëren en plakken van de code, geen bestaande macro’s overschrijft die u mogelijk nodig heeft.
3. Druk op F5 om de macro uit te voeren. Er verschijnt een prompt waarin u uw keuze kunt opgeven: voer 1 in als u alleen oneven pagina’s wilt afdrukken, of 2 voor even pagina’s.
Opmerking: Controleer uw invoer (1 of 2) zorgvuldig, want een onjuiste keuze kan ervoor zorgen dat de macro niet naar verwachting werkt. Bij een ongeldige waarde waarschuwt de macro u waarschijnlijk of gebeurt er niets.
4. Nadat u uw keuze hebt ingevoerd, klikt u op OK. Er verschijnt een tweede bevestigingsvenster waarin wordt gevraagd of u echt wilt doorgaan met afdrukken. Dit voorkomt per ongeluk afdrukken.
Als u wilt annuleren vóór het afdrukken, klikt u op Nee in dit venster; klik anders op Ja om door te gaan.
5.Na bevestiging stuurt Excel alleen de opgegeven oneven of even pagina’s van het actieve werkblad naar uw standaardprinter.
Probleemoplossing en tips:
- Deze macro wordt uitgevoerd op het momenteel actieve werkblad. Als u meerdere werkbladen wilt afdrukken, voert u de macro afzonderlijk uit voor elk werkblad.
- Let op de printerinstellingen voordat u de macro uitvoert – zorg ervoor dat in het afdialoogvenster van Excel de juiste printer is geselecteerd.
- Als er niets wordt afgedrukt, controleer dan opnieuw het afdrukgebied en zorg ervoor dat uw werkblad niet leeg is of onjuist is ingesteld voor afdrukken.
Oneven, even of specifieke pagina’s afdrukken zoals u wilt met Kutools voor Excel
Als u regelmatig oneven, even of meerdere specifieke pagina’s van uw werkbladen moet afdrukken, biedt Kutools voor Excel een zeer efficiënte oplossing. Deze aanpak is perfect voor gebruikers die een intuïtievere en gebruiksvriendelijkere interface zoeken om complexe afdruktaken eenvoudig te beheren. Met Kutools voor Excel kiest u niet alleen moeiteloos alle oneven of alle even pagina’s, maar geeft u ook op eenvoudige wijze willekeurige, aangepaste paginabereiken op – een functie die niet rechtstreeks beschikbaar is via de standaardopties van Excel of eenvoudige macro’s.
Na gratis installerenvan Kutools voor Excel, kunt u het hulpprogramma Gespecificeerde Pagina's Afdrukkengebruiken om diverse afdrukbehoeften efficiënt aan te pakken:
Navigeer hiervoor naar KUTOOLS PLUS > Afdrukken > Gespecificeerde Pagina's Afdrukken. Het dialoogvenster Gespecificeerde Pagina's Afdrukken verschijnt, waarin u de opties kunt instellen op basis van uw afdrukbehoeften.
 |  |  |
In dit dialoogvenster kunt u:
- Selecteer om alle Oneven Pagina's, alle even pagina’s of een specifiek Aangepast Bereik af te drukken, afhankelijk van uw behoeften. Dit biedt veel meer flexibiliteit dan de standaard afdrukopties van Excel.
- Bekijk uw selectie eenvoudig in de voorbeeldweergave om te controleren of u de juiste pagina’s afdrukt en zo afdrukafval te voorkomen.
Tip:
1. Om een aangepast bereik pagina’s zoals 1, 3, 5 en 9 tot en met 12 af te drukken, kiest u Aangepast Bereiken voert u uw bereik in het daarvoor bestemde veld in (bijv.)1, 3, 5, 9-12).
2. Om het aantal kopieën in te stellen, voert u eenvoudig het gewenste aantal exemplaren in bij de instelling Exemplaren om meerdere kopieën van uw geselecteerde pagina’s af te drukken.
3. Als u werkbladen in omgekeerde volgorde wilt afdrukken, vinkt u de optie In omgekeerde volgorde afdrukken aan. Dit is vooral handig bij grote afdruktaken waarbij het organiseren van pagina’s na het afdrukken lastig kan zijn.
Waarschuwingen en suggesties:
- Controleer van tevoren het pagina-einde en het afdrukgebied van uw werkblad om nauwkeurige resultaten te garanderen met de afdrukfuncties van Kutools.
- Als u ‘Bereik selecteren’ afdrukt, houd er dan rekening mee dat verborgen rijen of kolommen mogelijk toch worden meegenomen, afhankelijk van uw pagina-instellingen.
- Gebruik altijd Afdrukvoorbeeld om de uitvoer te controleren voordat u definitief afdrukt—zeker bij grote of kritieke documenten.
- Deze methode werkt per werkblad; herhaal deze zo nodig voor extra bladen.
Voordelen: Kutools voor Excel is perfect voor terugkerende taken, gebruikers die complexe rapporten beheren of iedereen die afdrukfouten wil minimaliseren. De interface vraagt geen programmeerkennis en is veel flexibeler dan VBA-oplossingen bij aangepaste afdruksituaties.
Alternatieve oplossing: Handmatig oneven of even pagina’s afdrukken via het afdialoogvenster
Als u geen VBA of externe hulpmiddelen wilt gebruiken, kunt u oneven of even pagina’s handmatig afdrukken in Excel — maar let op: u kunt slechts één paginabereik tegelijk afdrukken via het afdialoogvenster. Excel ondersteunt namelijk niet het invoeren van meerdere niet-aaneengesloten pagina’s (bijvoorbeeld 1, 3, 5) in het veld Pagina’s.
Om handmatig oneven of even pagina’s af te drukken:
- Ga naar Bestand > Afdrukken.
- Voer in het veld Pagina’s een enkel paginanummer in (bijv. 1) in het vak „Van” om alleen die specifieke pagina af te drukken.
- Klik op Afdrukken.
- Herhaal dit proces zo nodig voor elke oneven of even pagina.
Demo: Oneven, even of specifieke pagina’s afdrukken zoals u wilt met Kutools voor Excel
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