Přejít k hlavnímu obsahu

Jak tisknout více vybraných řádků na jednu stránku v aplikaci Excel?

Autor: Kelly Naposledy změněno: 2017-03-28

Při tisku výběrů v aplikaci Excel se po sobě následující rozsahy vytisknou na oddělené stránky. V některých případech možná budeme muset vytisknout pouze některé vybrané řádky / rozsahy na jednu stránku z dlouhé tabulky, ale tyto vybrané řádky / rozsahy nenasledují za sebou. Jak tedy vytisknout tyto řádky / rozsahy na jednu stránku v aplikaci Excel? Existuje několik řešení:

Tiskněte více vybraných řádků na jednu stránku pomocí VBA

Tisk více vybraných řádků na jednu stránku kopírováním do jednoho listu

Tiskněte více vybraných řádků na jednu stránku pomocí Kutools pro Excel

Hromadný tisk více výběrů (všechny tiskové oblasti) na jednu stránku v aplikaci Excel

Kutools pro Excel Průvodce tiskem více výběrů vám pomůže nejen snadno tisknout všechny tiskové oblasti ze stejného listu na jednu stránku, ale také snadno tisknout více rozsahů z mnoha listů na jednu stránku.

ad print multiple selection 2


Zde budu hovořit o tisku více vybraných řádků na jedné stránce pomocí VBA v aplikaci Excel. Postupujte prosím následovně:

1. lis Další + F11 současně otevřete okno Microsoft Visual Basic pro aplikace.

2. cvaknutí Vložit > Modula poté vložte následující kód VBA do nového otevíracího okna modulu.

VBA: Tisk více vybraných řádků na jednu stránku v aplikaci Excel

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. lis F5 klíč nebo klikněte na Běh tlačítko pro spuštění tohoto VBA.

4. Nyní se objeví dialogové okno Kutools pro Excel. Vyberte několik řádků, které chcete vytisknout, a klikněte na OK tlačítko pro tisk těchto řádků.

Poznámka: Držení Ctrl klíč, můžete vybrat více nesousedících řádků současně.


Pokud můžeme tyto po sobě jdoucí řádky zkopírovat a vložit jako po sobě jdoucí rozsah do jiného listu, můžeme je snadno vytisknout na jednu stránku. Tato metoda představí program Kutools pro Excel Kopírovat rozsahy nástroj se s tím vypořádat.

Kutools pro Excel - Baleno s více než 300 základními nástroji pro Excel. Užijte si plnohodnotnou 30denní zkušební verzi ZDARMA bez nutnosti kreditní karty! Stáhnout nyní!

1. Vytvořte nový list, dále vyberte řádky, které vytisknete z tabulky, a klikněte Kutools > Kopírovat rozsahy.

Poznámka: Držení Ctrl klíč, můžete vybrat několik po sobě jdoucích řádků najednou.

2. V úvodním dialogovém okně Kopírovat více rozsahů zaškrtněte Zobrazit vše a klepněte na tlačítko Ok .

Poznámka: Včetně výšky řádku možnost a Včetně šířky sloupce možnosti zkopírují výšky řádků a šířky sloupců vybraných rozsahů a vloží se do cílového rozsahu.

3. Vyberte buňku A1 v nově vytvořeném listu a klepněte na OK Tlačítko.

4. Zůstaňte v cílovém listu a klikněte na Kutools > Vymazat > Odstranit prázdné řádky > V aktivním listu.

A pak vyjde dialogové okno a ukáže vám, kolik řádků bylo odstraněno. Jen to zavři.

5. Klepněte na tlačítko Soubor (nebo Tlačítko Office)> Tisk tyto řádky vytisknout.

Kutools pro Excel - Supercharge Excel s více než 300 základními nástroji. Užijte si plnohodnotnou 30denní zkušební verzi ZDARMA bez nutnosti kreditní karty! Get It Now


Vlastně návrhy Kutools pro Excel Průvodce vícenásobným výběrem tisku pro tisk více rozsahů společně v aplikaci Excel.

Kutools pro Excel - Baleno s více než 300 základními nástroji pro Excel. Užijte si plnohodnotnou 30denní zkušební verzi ZDARMA bez nutnosti kreditní karty! Stáhnout nyní!

1. cvaknutí Enterprise > Tisk > Průvodce vícenásobným výběrem tisku otevřete Průvodce tiskem vícenásobného výběru.

2. V úvodním Průvodci tiskem více výběrů klepněte na přidat tlačítko  přidejte řádky, které budete tisknout společně, a klikněte na úprava .

Poznámky:

(1) Po kliknutí na přidat tlačítko , podržením klávesy můžete vybrat několik po sobě jdoucích rozsahů v jednom listu Ctrl klíč a poté je postupně vybírat;

(2) Odebrání rozsahu / řádku z Rozsahy pro tisk seznamu, vyberte tento rozsah / řádek a klikněte na Vymazat tlačítko.

(3) Tento nástroj nepodporuje tisk celých řádků a sloupců, jako je například celý řádek $ 4: $ 4, nebo celý sloupec $ B: $ B.

3. Vybrané řádky / rozsahy byly vloženy jako spojené obrázky do nového listu. Pokračujte kliknutím Soubor (nebo Tlačítko Office)> Tisk vytisknout.

Kutools pro Excel - Supercharge Excel s více než 300 základními nástroji. Užijte si plnohodnotnou 30denní zkušební verzi ZDARMA bez nutnosti kreditní karty! Get It Now


Kutools pro Excel: Více než 300 užitečných nástrojů na dosah ruky! Začněte svou 30denní bezplatnou zkušební verzi bez omezení funkcí ještě dnes. Stáhnout nyní!

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

Popis


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations