Hoe druk je alle werkbladen af, behalve één specifiek werkblad in Excel?
Bij het werken in Excel is het afdrukken van meerdere werkbladen een veelvoorkomende taak. Maar wat als je alle werkbladen in een werkboek wilt afdrukken, behalve één specifiek werkblad? Bijvoorbeeld, je wilt misschien alle werkbladen afdrukken, behalve het werkblad genaamd “Total”. In deze handleiding leiden we je door twee methoden om snel een werkblad uit te sluiten van je afdrukopdracht.
Alle werkbladen afdrukken behalve één met VBA
Druk bepaalde pagina's af die je nodig hebt met Kutools voor Excel
Alle werkbladen afdrukken behalve één met VBA
Hier is een VBA-code die alle werkbladen kan afdrukken, behalve één specifiek werkblad.
1. Activeer het werkboek waaruit je de werkbladen wilt afdrukken en druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.
2. Klik op Invoegen > Module, plak onderstaande code in het Modulescript.
VBA: Werkblad afdrukken behalve één
Sub printsheets() 'UpdatebyExtendoffice20161031 Dim xWs As Worksheet Application.ScreenUpdating = False For Each xWs In ThisWorkbook.Worksheets If xWs.Visible = True Then If xWs.Name <> "Total" Then With xWs.PageSetup .PrintArea = "A1:B15" ' USE YOUR PRINTAREA .Zoom = False .FitToPagesTall = 1 .FitToPagesWide = 1 End With xWs.PrintOut End If End If Next xWs Application.ScreenUpdating = False MsgBox "Sheet “Total” has not been printed", vbInformation, "Kutools for Excel" End Sub
Opmerking: In de code is Total in If xWs.Name <> "Total" Then en MsgBox "Sheet Total heeft niet afgedrukt" de naam van het werkblad dat je niet wilt afdrukken, en A1:B15 in .PrintArea = "A1:B15" is het bereik dat je van elk werkblad wilt afdrukken. Je kunt ze naar wens wijzigen.
3. Druk op F5 om de code uit te voeren, en vervolgens verschijnt er een dialoogvenster om je eraan te herinneren dat het specifieke werkblad niet is afgedrukt. Zie screenshot:
4. Klik op OK om het dialoogvenster te sluiten.
Druk bepaalde pagina's af die je nodig hebt met Kutools voor Excel
Als je alleen even of oneven pagina's wilt afdrukken, of specifieke pagina's van een werkblad, kun je de functie Specifieke pagina’s afdrukken van Kutools voor Excel gebruiken, die je snel kan helpen.
1. Activeer het werkblad waarin je bepaalde pagina's wilt afdrukken, klik op Kutools Plus > Afdrukken > Specifieke pagina’s afdrukken. Zie screenshot:
2. Vervolgens in het Specifieke pagina’s afdrukken dialoogvenster, selecteer de opties op basis van je afdrukbehoeften. Zie screenshot:
3. Klik op Afdrukken om de pagina's af te drukken.
Kutools voor Excel - Boost Excel met meer dan 300 essentiële tools. Geniet van permanent gratis AI-functies! Nu verkrijgen
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen