Preskoči na glavno vsebino

Kako natisniti več izbranih vrstic na eno stran v Excelu?

Pri tiskanju izbir v Excelu bodo zaporedni obsegi natisnjeni na ločenih straneh. V nekaterih primerih bomo morda morali natisniti le nekatere izbrane vrstice / obsege na eno stran iz dolge tabele, vendar te izbrane vrstice / obsegi niso zaporedne. Kako torej natisniti te vrstice / obsege na eno stran v Excelu? Obstaja več rešitev:

Na eno stran natisnite več izbranih vrstic z VBA

Natisnite več izbranih vrstic na eno stran s kopiranjem na en delovni list

Natisnite več izbranih vrstic na eno stran s programom Kutools for Excel

Skupinsko natisnite več izbir (vsa področja tiskanja) na eno stran v Excelu

Kutools za Excel Natisni čarovnik za več izbir vam lahko pomaga ne samo enostavno natisniti vseh območij tiskanja z istega delovnega lista na eno stran, temveč tudi enostavno natisniti več obsegov z več delovnih listov na eno stran.

oglas natisni več izbir 2


Tukaj bom govoril o tiskanju več izbranih vrstic na eno stran z VBA v Excelu. Naredite naslednje:

1. Pritisnite druga + F11 tipke hkrati, da odprete okno Microsoft Visual Basic for Applications.

2. klik Vstavi > Moduliin nato prilepite spodnjo kodo VBA v novo odpiralno okno modula.

VBA: Natisnite več izbranih vrstic na eno stran v Excelu

Sub Extract_to_Print()
Dim Rg As Range, Rg1 As Range, Rg2 As Range
Dim xAddress As String
Dim xSht As Worksheet
Dim I As Long
Dim xScreenUpdate As Boolean
Dim xAlert As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set Rg = Application.InputBox("Please select ranges you will print:", "Kutools for Excel", xAddress, , , , , 8)
If Rg Is Nothing Then Exit Sub
xScreenUpdate = Application.ScreenUpdating
xAlert = Application.DisplayAlerts
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xSht = ThisWorkbook.Worksheets.Add
I = 1
For Each Rg1 In Rg.Areas
Rg1.Copy xSht.Range("A" & I)
I = I + Rg1.Rows.Count
Next
xSht.PrintOut
xSht.Delete
Application.ScreenUpdating = xScreenUpdate
Application.DisplayAlerts = xAlert
End Sub

3. Pritisnite F5 ali kliknite Run za zagon tega VBA.

4. Zdaj se prikaže pogovorno okno Kutools za Excel. Izberite več vrstic, ki jih boste natisnili, in kliknite na OK za tiskanje teh vrstic.

Opombe: Držite Ctrl tipko, lahko hkrati izberete več sosednjih vrstic.


Če lahko te zaporedne vrstice kopiramo in prilepimo kot zaporedni obseg v drug delovni list, jih lahko enostavno natisnemo na eno stran. Ta metoda bo predstavila Kutools za Excel Obsegi kopiranja pripomoček za spopadanje s tem.

Kutools za Excel - Vsebuje več kot 300 osnovnih orodij za Excel. Uživajte v 30-dnevnem BREZPLAČNEM preizkusu s polnimi funkcijami brez kreditne kartice! Prenesi zdaj!

1. Ustvarite nov delovni list, nato izberite vrstice, ki jih boste natisnili iz tabele, in kliknite Kutools > Obsegi kopiranja.

Opombe: Držite Ctrl tipko, lahko hkrati izberete več zaporednih vrstic.

2. V začetnem pogovornem oknu Kopiraj več obsegov potrdite vsi in kliknite na Ok gumb.

Opombe: Vključno z višino vrstice možnost in Vključno s širino stolpca Možnosti bodo kopirale višine vrstic in širine stolpcev izbranih obsegov in jih prilepile v ciljni obseg.

3. Na novem ustvarjenem delovnem listu izberite celico A1 in kliknite OK Button.

4. Ostanite na ciljnem delovnem listu in kliknite Kutools > Brisanje > Izbriši prazne vrstice > V aktivnem listu.

Nato se odpre pogovorno okno in pokaže, koliko vrstic je bilo izbrisanih. Samo zapri.

5. Kliknite file (ali Gumb »Pisarna«)> Tiskanje da natisnete te vrstice.

Kutools za Excel - Napolnite Excel z več kot 300 osnovnimi orodji. Uživajte v 30-dnevnem BREZPLAČNEM preskusu s polnimi funkcijami brez kreditne kartice! Get It Now


Pravzaprav Kutools za Excel modele Natisni čarovnik za večkratno izbiro za skupno tiskanje več obsegov v Excelu.

Kutools za Excel - Vsebuje več kot 300 osnovnih orodij za Excel. Uživajte v 30-dnevnem BREZPLAČNEM preizkusu s polnimi funkcijami brez kreditne kartice! Prenesi zdaj!

1. klik Podjetje > Tiskanje > Natisni čarovnik za večkratno izbiro odpreti čarovnika za tiskanje večkratnega izbora.

2. V uvodnem čarovniku Print Multiple Selection čarovnika kliknite Dodaj Gumb  da dodate vrstice, ki jih boste skupaj natisnili, in kliknite Konec gumb.

Opombe:

(1) Po kliku na Dodaj Gumb , lahko na enem delovnem listu izberete več zaporednih obsegov, tako da držite tipko Ctrl tipko in jih nato izberite enega za drugim;

(2) Če želite odstraniti obseg / vrstico iz Obsegi za tiskanje izberite ta obseg / vrstico in kliknite Brisanje Gumb.

(3) Ta pripomoček ne podpira tiskanja celotnih vrstic in stolpcev, na primer celotne vrstice $ 4: $ 4ali celoten stolpec $ B: $ B.

3. Izbrane vrstice / obsegi so bili v nov delovni list prilepljeni kot povezane slike. Pojdi naprej file (ali Gumb »Pisarna«)> Tiskanje da ga natisnete.

Kutools za Excel - Napolnite Excel z več kot 300 osnovnimi orodji. Uživajte v 30-dnevnem BREZPLAČNEM preskusu s polnimi funkcijami brez kreditne kartice! Get It Now


Kutools za Excel: Več kot 300 priročnih orodij na dosegu roke! Začnite 30-dnevno brezplačno preskusno obdobje brez omejitev funkcij še danes. Download Now!

Najboljša pisarniška orodja za produktivnost

Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...

zavihek kte 201905


Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations