Salt la conținutul principal

Cum se imprimă mai multe selecții pe o singură pagină în Excel?

Dacă aveți o foaie de lucru mare, care conține multe date și acum, doriți să imprimați câteva intervale selectate care sunt necontinute într-o singură pagină, astfel încât să puteți economisi multă hârtie. Excel oferă Setați Print Arear caracteristică pentru a imprima mai multe selecții simultan, dar fiecare interval selectat va fi tipărit într-o singură pagină separat. Acest articol va vorbi despre cum să tipăriți mai multe selecții non-continue pe o singură pagină.

Imprimați mai multe selecții dintr-o foaie de lucru pe o pagină cu cod VBA

Imprimați mai multe selecții dintr-una sau mai multe foi de lucru pe o singură pagină cu Kutools pentru Excel


Imprimați mai multe selecții dintr-o foaie de lucru pe o pagină cu cod VBA

Pentru a tipări mai multe selecții necontigue selectate ale unei foi de lucru într-o singură pagină, următorul cod VBA vă poate ajuta, vă rugăm să faceți următoarele:

1. presa Ctrl pentru a selecta intervalele pe care doriți să le imprimați.

2. Țineți apăsat butonul ALT + F11 tastele și deschide fișierul Microsoft Visual Basic pentru aplicații fereastră.

3. Clic Insera > Moduleși lipiți următorul cod în Module Fereastră.

Cod VBA: tipăriți mai multe selecții într-o singură pagină

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. Apoi apăsați F5 pentru a rula acest cod, iar intervalele selectate vor fi tipărite simultan și vor fi tipărite într-o singură pagină.


Imprimați mai multe selecții dintr-una sau mai multe foi de lucru pe o singură pagină cu Kutools pentru Excel

Numai codul de mai sus vă poate ajuta să imprimați intervalele selectate dintr-o singură foaie de lucru, dacă doriți ca mai multe selecții din mai multe foi de lucru să fie tipărite într-o singură pagină, codul de mai sus nu va funcționa. Vă rog să nu vă faceți griji, aici vă pot introduce un instrument la îndemână - Kutools pentru Excel, Cu său Print Print Selection Wizard utilitar, puteți imprima selecțiile dintr-o foaie de lucru sau mai multe foi de lucru într-o singură pagină simultan.

Kutools pentru Excel : cu mai mult de 300 de programe de completare Excel la îndemână, gratuit pentru a încerca fără limitări în 30 de zile

După instalare Kutools pentru ExcelVă rugăm să efectuați pașii următori:

1. Clic Kutools Plus > tipărire > Print Print Selection Wizard, vezi captura de ecran:

2. În Print Print Selection Wizard, Faceți clic pebutonul de adăugare doc buton pentru a selecta și adăuga intervalul pe care doriți să îl imprimați în caseta de listă Intervalele pentru a imprima unul câte unul, (puteți selecta intervalele dintr-o foaie de lucru sau mai multe foi de lucru), faceți clic pe butonul de eliminare doc butonul poate elimina intervalele de care nu aveți nevoie, consultați captura de ecran:

doc printează mai multe selecții 2

3. După adăugarea selecțiilor în caseta de listă, faceți clic pe Următoarea >> pentru a trece la pasul 2 al vrăjitorului, specificați setările de imprimare după cum aveți nevoie și puteți adăuga un rând gol între intervalele selectate prin bifare Adăugați un rând gol între intervale opțiune, vezi captura de ecran:

doc printează mai multe selecții 3

4. Apoi continuați să faceți clic Următoarea >> butoon, la pasul 3 al vrăjitorului, specificați acțiunea pentru foaia de lucru temporară, puteți activa foaia de lucru, dar nu imprimați, imprimați foaia de lucru și păstrați-o sau imprimați foaia de lucru și ștergeți-o. Vedeți captura de ecran:

doc printează mai multe selecții 4

5. Clic finalizarea butonul, toate intervalele selectate au fost lipite într-o nouă foaie de lucru ca obiecte de imagine legate. Și le puteți trage și rearanja în foaia de lucru. Vedeți captura de ecran:

doc printează mai multe selecții 5

6. Când imprimați această nouă foaie de lucru, intervalele vor fi tipărite într-o singură pagină, după cum aveți nevoie.

Faceți clic pentru a afla mai multe despre acest utilitar Print Multiple Selection Wizard.

Descărcați și proba gratuită Kutools pentru Excel acum!


Demo: Imprimați mai multe selecții dintr-una sau mai multe foi de lucru pe o singură pagină cu Kutools pentru Excel

Kutools pentru Excel: cu mai mult de 300 de programe de completare Excel la îndemână, încercați fără limitări în 30 de zile. Descărcați și proba gratuită acum!

Cele mai bune instrumente de productivitate de birou

🤖 Kutools AI Aide: Revoluționați analiza datelor pe baza: Execuție inteligentă   |  Generați codul  |  Creați formule personalizate  |  Analizați datele și generați diagrame  |  Invocați funcțiile Kutools...
Caracteristici populare: Găsiți, evidențiați sau identificați duplicatele   |  Ștergeți rândurile goale   |  Combinați coloane sau celule fără a pierde date   |   Rundă fără Formula ...
Super căutare: VLookup cu mai multe criterii    VLookup cu valori multiple  |   VLookup pe mai multe foi   |   Căutare fuzzy ....
Listă derulantă avansată: Creați rapid o listă derulantă   |  Listă drop-down dependentă   |  Listă derulantă cu selectare multiplă ....
Manager de coloane: Adăugați un număr specific de coloane  |  Mutați coloanele  |  Comutați starea vizibilității coloanelor ascunse  |  Comparați intervale și coloane ...
Caracteristici prezentate: Focus pe grilă   |  Vedere de proiectare   |   Big Formula Bar    Manager registru de lucru și foi   |  Biblioteca de resurse (Text automat)   |  Data Picker   |  Combinați foi de lucru   |  Criptare/Decriptare celule    Trimiteți e-mailuri după listă   |  Super Filtru   |   Filtru special (filtrează bold/italic/barat...) ...
Top 15 seturi de instrumente12 Text Instrumente (Adăuga text, Eliminați caractere,...)   |   50+ Diagramă Tipuri de (Gantt Chart,...)   |   40+ Practic Formule (Calculați vârsta pe baza zilei de naștere,...)   |   19 inserare Instrumente (Introduceți codul QR, Inserați imaginea din cale,...)   |   12 Convertire Instrumente (Numere la cuvinte, conversie valutara,...)   |   7 Merge & Split Instrumente (Rânduri combinate avansate, Celule divizate,...)   |   ... și altele

Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp.  Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...

Descriere


Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
how to print selection area with multi print ? i means selection area i wan to print 10 times
This comment was minimized by the moderator on the site
I tried your VBA code with Excel 2016 and I get an error: Compile Error: Sub of Function not defined. This line is highlighted: Set xRng1 = xNewWs.Cells(xIndex, 1)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations