Hoe sluit u een specifiek werkblad uit bij het afdrukken van een werkmap?
Als u een werkmap met meerdere werkbladen hebt die u wilt afdrukken, maar één specifiek werkblad wilt uitsluiten, is er dan een snelle en eenvoudige manier om in Excel alle bladen behalve dat ene af te drukken?
Een specifiek werkblad uitsluiten bij het afdrukken van een werkmap met VBA-code
Een specifiek werkblad uitsluiten bij het afdrukken van een werkmap met VBA-code
Om de volledige werkmap af te drukken, met uitzondering van één specifiek werkblad, helpt de volgende VBA-code u verder.
1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op Invoegen > Module en plak de volgende code in het modulevenster.
VBA-code: Een specifiek werkblad uitsluiten bij het afdrukken van een werkmap:
Private Sub Printexclude()
'Updateby Extendoffcie
Dim ws As Worksheet
Dim strShName As String
On Error Resume Next
strShName = Application.InputBox("Enter the sheet name you want to exclude:", _
"Kutools For Excel", , , , , , 2)
Application.ScreenUpdating = False
For Each ws In ThisWorkbook.Worksheets
If ((ws.Visible = xlSheetVisible) And _
(ws.Name <> strShName)) Then ws.PrintOut
Next ws
Application.ScreenUpdating = True
End Sub
3. Druk vervolgens op de toets F5 om deze code uit te voeren. Er verschijnt een dialoogvenster waarin u wordt gevraagd de naam in te voeren van het werkblad dat u wilt uitsluiten bij het afdrukken van de werkmap. Zie de schermafbeelding:
4. Klik daarna op de knop OK, waarna alle andere werkbladen in één keer worden afgedrukt, met uitzondering van het opgegeven werkblad.
Ontgrendel de magie van Excel met KUTOOLS AI
- Slimme uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak grafieken — allemaal met eenvoudige opdrachten.
- aangepaste formules: Genereer op maat gemaakte formules om uw workflows te stroomlijnen.
- VBA-programmeren: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules moeiteloos.
- Tekstvertaling: Doorbreek taalbarrières in uw spreadsheets.
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