Ga naar hoofdinhoud

Hoe een bepaalde cel of gebied uitsluiten van afdrukken in Excel?

Wanneer u een werkblad afdrukt, moet u om een ​​of andere reden waarden van bepaalde cellen of gebieden uitsluiten van afdrukken. De methoden in dit artikel laten u zien hoe u een bepaalde cel of gebied kunt uitsluiten van afdrukken in details.

Sluit bepaalde cellen of gebieden uit van afdrukken door het celformaat aan te passen
Sluit bepaalde cellen of gebieden uit van afdrukken op VBA-code


Sluit bepaalde cellen of gebieden uit van afdrukken door het celformaat aan te passen

Zoals onderstaand screenshot laat zien, moet u de nummer 5 en 9 rijen uitsluiten tijdens het afdrukken van het werkblad. Voordat u gaat afdrukken, kunt u de indeling van een bepaalde cel of gebied aanpassen om de celinhoud te verbergen om dit te bereiken. Ga als volgt te werk.

1. Selecteer de cel of het gebied dat u wilt uitsluiten van afdrukken (hier selecteer ik meerdere bereiken A6: C6 en A10: C10), en druk vervolgens op Ctrl + 1 toetsen tegelijkertijd om het dialoogvenster Cellen opmaken te openen.

2. In de Cellen opmaken dialoogvenster, klik Eigen in de Categorie doos onder de Telefoon Nummer tab en voer vervolgens drie puntkomma's in ;;; in de Type vak en klik ten slotte op het OK knop. Zie screenshot:

Nu wordt alle inhoud in geselecteerde bereiken onmiddellijk verborgen, zoals hieronder wordt getoond. U kunt nu beginnen met het afdrukken van het werkblad.

Opmerking: Na het afdrukken kunt u de puntkomma's die u in stap 2 hebt ingevoerd, verwijderen uit het dialoogvenster Cellen opmaken om de celinhoud weer te geven.


Sluit bepaalde cellen of gebieden uit van afdrukken op VBA-code

Naast de bovenstaande methode, kunt u de volgende VBA-code toepassen om automatisch de inhoud van gespecificeerde cellen of gebieden te verbergen tijdens het afdrukken van een werkblad.

1. druk op anders + F11 toetsen tegelijkertijd om het Microsoft Visual Basic voor toepassingen venster.

2. In de Microsoft Visual Basic voor toepassingen venster, dubbelklik Dit Werkboek in de Project paneel en kopieer en plak vervolgens de onderstaande VBA-code in het ThisWorkbook (code) venster.

VBA-code: sluit bepaalde cellen of gebieden uit van afdrukken in Excel

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Dim xIndex As Long
    If ActiveSheet.Name = "Sheet1" Then
        Cancel = True
        Application.EnableEvents = False
        Application.ScreenUpdating = False
        With ActiveSheet
            xIndex = .Range("A6:C6,A10:C10").Font.ColorIndex
            .Range("A6:C6,A10:C10").Font.Color = vbWhite
            .PrintOut
            .Range("A6:C6,A10:C10").Font.ColorIndex = xIndex
        End With
        Application.EnableEvents = True
        Application.ScreenUpdating = True
    End If
    MsgBox "Print completed!", vbInformation, "Kutools for Excel"
End Sub

Note: In de code is Blad1 de actieve bladnaam die u moet afdrukken, en A6: C6, A10: C10 zijn de bereiken die u wilt uitsluiten van het afdrukken. Wijzig ze op basis van uw behoeften.

3. druk op anders + Q toetsen tegelijkertijd om het venster Microsoft Visual Basic for Applications te sluiten.

Nu kunt u uw werkblad afdrukken. Nadat u klaar bent met afdrukken, krijgt u een Kutools for Excel dialoogvenster zoals hieronder afgebeeld. En u kunt zien dat de opgegeven bereiken blanco zijn op de afdruk.


Gerelateerde artikelen:

Beste Office-productiviteitstools

Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

kte tabblad 201905


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
Comments (3)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
I've recieved an error in my line:

xIndex = .Range("B52:K92").Font.ColorIndex
This comment was minimized by the moderator on the site
Hi Maria,
After modifying the ranges in the VBA code, please press the "Save" button to save the code first, then go to print.
This comment was minimized by the moderator on the site
__________
Rated 5 out of 5
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations