Přejít k hlavnímu obsahu

Jak tisknout pouze řádky / buňky s daty v aplikaci Excel?

Při tisku rozsahu nebo listu v aplikaci Excel se vytisknou také některé prázdné řádky nebo prázdné buňky, které zabírají mezery v dokumentech. Tento článek hovoří o tom, jak ignorovat všechny prázdné řádky / buňky a pouze tisknout řádky / buňky s daty v aplikaci Excel.

Tiskněte pouze řádky s daty pomocí VBA v aplikaci Excel

Vytiskněte pouze řádky s daty odstraněním prázdných řádků v aplikaci Excel

Vytiskněte pouze buňky s daty zkopírováním buněk s daty na nový list v aplikaci Excel

Dávkový tisk více neprázdných řádků s ignorováním prázdných řádků v aplikaci Excel

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

ad print multiple selection 2


Tato metoda zavede VBA pro rychlý tisk řádků s daty pouze v zadaném rozsahu v aplikaci Excel. Postupujte prosím následovně:

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

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

VBA: Tiskněte pouze řádky s daty v aplikaci Excel

Sub PrintSummary()
Dim xRg As Range, xRg1 As Range, xCell As Range
Dim xSht As Worksheet
Dim xTxt As String
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the range to print:", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "You can't select multiple selections", , "Kutools for Excel"
Exit Sub
End If
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Set xSht = Worksheets.Add(After:=Sheets(Sheets.Count))
xRg.Copy xSht.Range("A1")
Set xRg1 = xSht.Range("A1").Resize(xRg.Rows.Count, xRg.Columns.Count)
For Each xCell In xRg1.Columns(1).Cells
If Application.WorksheetFunction.CountA(xCell.EntireRow) = 0 Then
xCell.EntireRow.Hidden = True
End If
Next
xSht.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
xSht.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. zmáčkni F5 klíč nebo klikněte na Běh tlačítko pro spuštění tohoto VBA.

4. V úvodním dialogovém okně Kutools pro Excel zadejte rozsah, ve kterém chcete ignorovat prázdné řádky a tisknout pouze řádky s daty, a klikněte na OK .

Poté se zadaný rozsah okamžitě vytiskne s ignorováním všech prázdných řádků v něm.

Poznámka: Tento VBA nepodporuje dávkový tisk více výběrů s ignorováním prázdných řádků.


Tato metoda zavádí Kutools pro Excel Odstranit prázdné řádky nástroj pro odstranění všech prázdných buněk v aktivním listu nebo vybraném rozsahu a poté tyto řádky vytisknout s daty pouze v aplikaci Excel. Postupujte prosím následovně:

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. Přejděte na list, kde budete tisknout pouze řádky s daty, a klikněte na Kutools > Vymazat > Odstranit prázdné řádky > V aktivním listu. Viz snímek obrazovky:

Poznámka: Chcete-li tisknout řádky s daty pouze v zadaném rozsahu, nejprve vyberte tento rozsah a poté klikněte Kutools > Vymazat > Odstranit prázdné řádky > Ve zvoleném rozsahu.

2. Otevře se dialogové okno Kutools pro Excel a ukáže vám, kolik prázdných řádků bylo odstraněno. Klikněte na ikonu OK pro jeho zavření.

A teď uvidíte, že všechny prázdné řádky jsou odstraněny z aktivního listu / vybraného rozsahu. Viz snímek obrazovky:

3. Klepněte na tlačítko Soubor (nebo Tlačítko Office)> Tisk tisknout pouze řádky s daty v aktivním listu nebo vybraném rozsahu.

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


Někdy můžete chtít tisknout buňky s daty pouze při ignorování všech prázdných buněk v aplikaci Excel. Tato metoda představí program Kutools pro Excel Vyberte neprázdné buňky utility a Průvodce tiskem více výběrů tisknout pouze buňky s daty ve specifikovaném rozsahu 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. Vyberte rozsah, kde budete tisknout pouze buňky s daty, a klepněte na Kutools > vybrat > Vyberte neprázdné buňky. Viz snímek obrazovky:

2. Vyjde dialogové okno Kutools pro Excel a ukáže vám, kolik buněk s daty bylo vybráno. Klikněte na ikonu OK pro jeho zavření.

3. Pokračujte ve výběru těchto neprázdných buněk a klepněte na Enterprise > Tisk > Průvodce tiskem více výběrů. Viz snímek obrazovky:

4. V úvodním dialogovém okně Průvodce tiskem více výběrů uvidíte, že jsou v seznamu uvedeny všechny vybrané neprázdné buňky Rozsahy pro tisk seznamu, klikněte prosím na úprava .

5. Nyní jsou všechny vybrané neprázdné buňky zkopírovány a vloženy jako spojené obrázky do nového listu. prosím klikněte Soubor (nebo Tlačítko Office)> Tisk vytisknout tyto buňky daty.

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

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...

karta kte 201905


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
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations