Inhoudsopgave
Als we een aangepaste afdrukknop in ons Excel-werkblad kunnen instellen, kan dat zeer gebruiksvriendelijk en tijdbesparend zijn voor het afdrukken van bladen. Door gebruik te maken van VBA-macro's kunnen we het gemakkelijk doen. Dus dit artikel geeft je 5 eenvoudige macro's om te gebruiken VBA code voor de afdrukknop in Excel.
Download Praktijk Werkboek
U kunt het gratis Excel-sjabloon hier downloaden en zelf oefenen.
VBA-code om afdrukknop te maken.xlsm5 voorbeelden van VBA-code voor afdrukknop in Excel
Laten we eerst kennismaken met onze dataset die een aantal verkoper verkoop in verschillende Regio's .
1. Gebruik VBA-code om afdrukknop te maken voor dialoogvenster Afdrukken in Excel
Eerst maken we een Afdrukknop en zal er dan codes voor schrijven.
Stappen:
- Klik op als volgt: Ontwikkelaar >> Plaats >> Knopendoos.
Kort daarna krijg je een plusteken (+) in uw cursor .
- Sleep dat cursor volgens uw gewenste knopgrootte en na een tijdje, een dialoogvenster genaamd Macro toewijzen gaat open.
- Geef een naam en pers Nieuw .
A VBA venster verschijnt.
- Voer dan de volgende codes in-
Sub DialogBox() Application.Dialogs(xlDialogPrint).Show End Sub - Nu ga terug aan uw blad .
Code Breakdown
- Hier heb ik een Sub procedure, DialogBox .
- Dan gebruikt Dialogen (xlDialogPrint).Show om de Dialoogvenster afdrukken .
De knop is gemaakt.
- Klik met de rechtermuisknop op op de knop en selecteer Bewerk tekst van de Contextmenu om de naam van de knop te veranderen.
- Later, net type de naam en klik uw muis overal buiten de knop .
Druk dan gewoon op de Knop .
Dan krijg je de Dialoogvenster afdrukken Als je wilt kun je Afdrukken nu.
Als je geen Printer op dit moment kun je Sla het als PDF . voor verder gebruik of om Afdrukken later.
- Druk nu op OK .
- Geef op dit moment gewoon een naam en druk op Sla .
Hier is de afgedrukte PDF .
Lees meer: Hoe afdrukinstellingen aanpassen in Excel (8 geschikte trucs)
2. VBA-code gebruiken om afdrukknop voor actief blad te maken
Hier gebruiken we VBA naar print een Actief Blad .
Stappen:
- Volg de eerste twee stappen van de eerste sectie om de knop en Een macro toewijzen .
- Schrijf een Macro Naam en druk op Nieuw .
Kort daarna, een VBA venster wordt geopend.
- Dan schrijf het volgende codes erin.
Sub ActiveSheet() ActiveSheet.PrintOut Einde Sub - Later, ga terug aan de
Code Breakdown
- Hier heb ik een Sub procedure, ActiveSheet .
- Dan gebruikt PrintOut naar selecteer de actief blad en print het.
- Nu alleen nog pers de Knop .
A dialoogvenster genaamd Uitvoer opslaan als gaat open.
- Geef een naam en druk op Sla .
Dan krijg je de afgedrukte PDF .
U kunt de printer als je het nodig hebt.
- Klik op op Bestand naast de Home
- Selecteer vervolgens Afdrukken optie en klik op de uitklapbaar om een Printer .
Lees meer: Alle bladen in Excel afdrukken (3 methoden)
3. VBA-code toepassen om afdrukknop te maken voor geselecteerde bladen in Excel
Als u Afdrukken specifiek geselecteerde vellen dan is het ook mogelijk met behulp van VBA .
Stappen:
- Volg de eerste twee stappen van de eerste sectie om de knop en toewijzen a macro .
- Schrijf dan een Macro Naam en druk op Nieuw .
Kort daarna, een VBA venster wordt geopend.
- Later, type het volgende codes erin.
Sub GeselecteerdeBladen() ActiveWindow.GeselecteerdeBladen.PrintOut Einde Sub Dan ga terug aan uw blad .
Code Breakdown
- Hier heb ik een Sub procedure, SelectedSheets .
- Dan gebruikt ActiveWindow naar selecteer blad van de actief Excel raam .
- Vervolgens gebruikte PrintOut om af te drukken meerdere geselecteerde platen .
- Nu vellen selecteren en druk op de Afdrukknop Ik heb twee bladen geselecteerd.
- Geef een naam voor de PDF en druk op Sla .
De PDF bestand heeft t wo pagina's voor de twee bladen .
Lees meer: Hoe specifieke bladen afdrukken met VBA Macro in Excel (4 manieren)
Vergelijkbare lezingen:
- Hoe Excel-blad afdrukken in A4-formaat (4 manieren)
- Kopregel in Excel behouden bij het afdrukken (3 manieren)
- Excel VBA: Hoe afdrukgebied dynamisch instellen (7 manieren)
- Hoe Excel blad met lijnen afdrukken (3 eenvoudige manieren)
- Grafiek afdrukken in Excel (5 manieren)
4. Embed Excel VBA om afdrukknop te maken voor specifiek blad met geselecteerd bereik
Hier maken we een Afdrukknop naar print a geselecteerd assortiment van een specifiek blad .
Stappen:
- Volg de eerste twee stappen van de eerste sectie om de knop en wijs een macro toe.
- Schrijf een Macro Naam en druk op Nieuw .
Kort daarna, een VBA venster wordt geopend.
- Dan schrijf het volgende codes -
Sub SpecificSheetnRange() Met Sheets("SpecificSheet+Range") .PageSetup.PrintArea = "B2:D11" .PrintOut End With End Sub - Ga later terug naar je blad.
Code Breakdown
- Hier heb ik een Sub procedure, SpecificSheetnRange .
- Dan gebruikt Met verklaring aan selecteer a specifiek
- Volgende, PrintArea = "B2:D11".PrintOut zal selecteer de reeks van de specifiek blad en zal Afdrukken het.
- Nu alleen nog pers de Afdrukknop .
- Stel een naam voor de PDF en druk op Sla .
Het is de gedrukt specifiek blad.
Lees meer: Excel VBA: Afdrukgebied instellen voor meerdere bereiken (5 voorbeelden)
5. Excel VBA integreren om afdrukknop te maken voor actief blad met geselecteerd bereik
Ook kunt u selecteer een reeks van de actief blad en kan een Afdrukknop naar print het met behulp van VBA .
Stappen:
- Volg de eerste twee stappen van de eerste sectie om de knop en een macro .
- Schrijf later een Macro Naam en druk op Nieuw .
Kort daarna, een VBA venster wordt geopend.
- In de VBA raam, schrijf het volgende codes -
Sub ActiveSheetnRange() Range("B2:D11").PrintOut End Sub - Dan ga terug aan uw blad .
Code Breakdown
- Hier heb ik een Sub procedure, ActiveSheetnRange .
- Dan gebruikt Range("B2:D11").PrintOut naar selecteer a reeks en afdrukken.
- Druk op de Afdrukknop .
- Geef een naam en druk op Sla .
Dan krijg je de gedrukt assortiment .
Lees meer: Excel-knop om specifieke bladen af te drukken (met eenvoudige stappen)
Conclusie
Ik hoop dat de hierboven beschreven procedures goed genoeg zijn om VBA-code te gebruiken voor de afdrukknop Voel je vrij om vragen te stellen in de commentaar sectie en geef me feedback.
