Hoe meerdere selecties op één pagina in Excel afdrukken?
Als u een groot werkblad heeft dat veel gegevens bevat, en u wilt nu enkele geselecteerde bereiken afdrukken die niet doorlopend zijn op één pagina, zodat u veel papier kunt besparen. Excel biedt de Stel Afdrukgebied in functie voor ons om meerdere selecties tegelijk af te drukken, maar elk geselecteerd bereik wordt afzonderlijk op één pagina afgedrukt. In dit artikel wordt besproken hoe u meerdere niet-doorlopende selecties op één pagina kunt afdrukken.
Druk meerdere selecties af van één werkblad op één pagina met VBA-code
Druk meerdere selecties van een of meerdere werkbladen op één pagina af met Kutools voor Excel
Druk meerdere selecties af van één werkblad op één pagina met VBA-code
Om meerdere geselecteerde niet-aaneengesloten selecties van één werkblad op één pagina af te drukken, kan de volgende VBA-code u helpen, doe dit als volgt:
1. pers Ctrl toets om de bereiken te selecteren die u wilt afdrukken.
2. Houd de ALT + F11 toetsen, en het opent de Microsoft Visual Basic voor toepassingen venster.
3. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA-code: druk meerdere selecties af op één pagina
Sub PrintOutRange()
'Updateby Extendoffice
Dim xRng1 As Range
Dim xRng2 As Range
Dim xNewWs As Worksheet
Dim xWs As Worksheet
Dim xIndex As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWs = ActiveSheet
Set xNewWs = Worksheets.Add
xWs.Select
xIndex = 1
For Each xRng2 In Selection.Areas
xRng2.Copy
Set xRng1 = xNewWs.Cells(xIndex, 1)
xRng1.PasteSpecial xlPasteValues
xRng1.PasteSpecial xlPasteFormats
xIndex = xIndex + xRng2.Rows.Count
Next
xNewWs.Columns.AutoFit
xNewWs.PrintOut
xNewWs.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
4. Druk vervolgens op F5 toets om deze code uit te voeren, en de door u geselecteerde reeksen worden onmiddellijk afgedrukt en op één pagina afgedrukt.
Druk meerdere selecties van een of meerdere werkbladen op één pagina af met Kutools voor Excel
De bovenstaande code kan u alleen helpen om de geselecteerde bereiken van één werkblad af te drukken. Als u meerdere selecties van verschillende werkbladen op één pagina wilt afdrukken, zal de bovenstaande code niet werken. Maak je geen zorgen, hier kan ik je een handige tool voorstellen - Kutools for Excel, Met Wizard Meervoudige selectie afdrukken hulpprogramma, kunt u de selecties van één werkblad of meerdere werkbladen tegelijk op één pagina afdrukken.
Kutools for Excel : met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. |
Na het installeren van Kutools for Excel, voer de volgende stappen uit:
1. Klikken Koetools Plus > Printen > Wizard Meervoudige selectie afdrukken, zie screenshot:
2. In de Wizard Meervoudige selectie afdrukken, Klik om het bereik dat u wilt afdrukken een voor een te selecteren en toe te voegen aan de keuzelijst Bereiken om af te drukken (u kunt de bereiken van één werkblad of meerdere werkbladen selecteren), klik op knop kan de bereiken verwijderen die u niet nodig heeft, zie screenshot:
3. Na het toevoegen van de selecties aan de keuzelijst, klikt u op Volgende >> knop om naar stap 2 van de wizard te gaan, geef de afdrukinstellingen op zoals u nodig hebt, en u kunt een lege rij tussen de geselecteerde bereiken toevoegen door aan te vinken Voeg een lege rij toe tussen bereiken optie, zie screenshot:
4. Blijf dan klikken Volgende >> butoon, specificeer in stap 3 van de wizard de actie voor het tijdelijke werkblad, u kunt het werkblad activeren maar niet afdrukken, het werkblad afdrukken en bewaren of het werkblad afdrukken en verwijderen. Zie screenshot:
5. Klikken Finish knop, zijn alle geselecteerde bereiken in een nieuw werkblad geplakt als gekoppelde afbeeldingsobjecten. En u kunt ze slepen en opnieuw rangschikken in het werkblad. Zie screenshot:
6. Wanneer u dit nieuwe werkblad afdrukt, worden de bereiken naar behoefte op één enkele pagina afgedrukt.
Klik om meer te weten over dit hulpprogramma voor de wizard Meervoudige selectie afdrukken.
Download en gratis proef Kutools voor Excel nu!
Demo: druk meerdere selecties van een of meerdere werkbladen op één pagina af met Kutools voor Excel
Beste Office-productiviteitstools
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...
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!