Hoe toon je alleen het afdrukgebied in een werkblad in Excel?

Wanneer we een werkblad weergeven in de Paginascheiding-weergave door te klikken op Weergave > Paginascheiding Voorbeeld, zal de achtergrond van het niet-afdrukbare gebied automatisch veranderen naar donkergrijs. Zie onderstaande schermafbeelding:

Opmerking: Je kunt ook overschakelen naar de Paginascheiding Voorbeeld-weergave door te klikken op Paginascheiding Voorbeeld knop in de Statusbalk.

Echter, deze methode verbergt het niet-afdrukbare gebied niet en je kunt nog steeds de gegevens in het niet-afdrukbare gebied bekijken.

Eén klik om alles behalve het geselecteerde bereik te verbergen (verberg ongebruikte kolommen/rijen/cellen)

Het grootste deel van de tijd gebruiken we mogelijk slechts een deel van het werkblad met numerieke lege cellen/bereiken over. Kutools voor Excel’s Verberg niet-geselecteerd gebied hulpprogramma kan je helpen met één klik alles behalve het geselecteerde bereik te verbergen, of alle ongebruikte cellen/rijen/kolommen/bereiken gemakkelijk te verbergen.

Om het niet-afdrukbare gebied volledig te verbergen in Excel, kun je proberen een VBA-macro te gebruiken. En je kunt als volgt te werk gaan:

Stap 1: Druk gelijktijdig op de Alt + F11 toetsen om het Microsoft Visual Basic for Applications-venster te openen.

Stap 2: Klik op Invoegen > Module, en plak vervolgens de volgende VBA-code in het modulevenster:

VBA: Alleen het afdrukgebied weergeven in het huidige werkblad

Public Sub HideAllButPrintArea()
Dim xPrintRng As Range
Dim xFirstRng As Range
Dim xLastRng As Range
Application.ScreenUpdating = False
With Application.ActiveSheet
.Cells.EntireColumn.Hidden = False
.Cells.EntireRow.Hidden = False
If .PageSetup.PrintArea <> "" Then
Set xPrintRng = .Range(.PageSetup.PrintArea)
Else
Set xPrintRng = .UsedRange
End If
Set xFirstRng = xPrintRng.Cells(1)
Set xLastRng = xPrintRng.Cells(xPrintRng.Count)
If xFirstRng.Row > 1 Then
.Range(.Cells(1, 1), xFirstRng(-0, 1)).EntireRow.Hidden = True
End If
If xFirstRng.Column > 1 Then
.Range(.Cells(1, 1), xFirstRng(1, 0)).EntireColumn.Hidden = True
End If
If xLastRng.Row < .Rows.Count Then
.Range(xLastRng(2, 1), .Cells(.Rows.Count, 1)).EntireRow.Hidden = True
End If
If xLastRng.Column < .Columns.Count Then
.Range(xLastRng(1, 2), .Cells(1, .Columns.Count)).EntireColumn.Hidden = True
End If
End With
Application.ScreenUpdating = True
End Sub

Stap 3: Druk op de F5-toets of klik op de Uitvoeren-knop om deze VBA-macro uit te voeren.

Vervolgens zie je dat het niet-afdrukbare gebied direct verborgen wordt en alleen het afdrukgebied wordt weergegeven in het huidige werkblad. Zie onderstaande schermafbeelding:

Opmerkingen:

1. Wanneer er slechts één afdrukgebied is in het huidige werkblad, werkt de VBA-macro goed.
2. Deze methode ondersteunt geen ongedaan maken. Om het niet-afdrukbare gebied weer te geven, moet je handmatig het niet-afdrukbare gebied terug tonen, of Kutools voor Excel’s Verberg > Verberg alle bereiken-hulpmiddel gebruiken.

Als je Kutools voor Excel hebt geïnstalleerd, helpt het hulpmiddel Verberg niet-geselecteerd gebied je om eenvoudig alleen een afdrukgebied in het huidige werkblad weer te geven.

Stap 1: Selecteer het afdrukgebied in het huidige werkblad.

Opmerking: Als je het afdrukgebied niet snel kunt vinden, kun je op F5 drukken om het Ga Naar dialoogvenster te openen, selecteer de naam van het afdrukgebied en klik op de OK knop zoals hieronder afgebeeld. Maar deze methode selecteert alle afdrukgebieden in het huidige werkblad.

Stap 2: Klik op Kutools > Toon / Verberg > Verberg niet-geselecteerd gebied.

Dan zie je dat alleen het geselecteerde afdrukgebied direct wordt weergegeven in het huidige werkblad zoals hieronder afgebeeld:

Opmerkingen:

1. Kutools voor Excel’s Verberg niet-geselecteerd gebied ondersteunt ongedaan maken, en je kunt tegelijkertijd op de Ctrl + Z -toetsen drukken om verborgen niet-afdrukbare gebieden weer te geven.
2. Je kunt op Kutools > Toon / Verberg > Verberg alle bereiken klikken om verborgen niet-afdrukbare gebieden onmiddellijk weer te geven.

Scrollpositie instellen of andere cellen verbergen

Verborgen bereiken (kolommen en rijen) weergeven

Andere werkbladen verbergen