Přejít k hlavnímu obsahu

Jak tisknout pouze poslední stránku listu v aplikaci Excel?

Autor: Siluvia Naposledy změněno: 2024-08-07

V mnoha případech budete možná potřebovat vytisknout poslední stránku listu v aplikaci Excel. Jak to udělat? Tento článek poskytuje řešení, jak toho dosáhnout.

Tiskněte pouze poslední stránku listu s kódem VBA


Tiskněte pouze poslední stránku listu s kódem VBA

Následující kód VBA můžete spustit a vytisknout pouze poslední stránku listu v aplikaci Excel. Postupujte prosím následovně.

1. Otevřete list, který potřebujete k vytištění poslední stránky, a stiskněte Další + F11 současně otevřete Microsoft Visual Basic pro aplikace okno.

2. V okně Microsoft Visual Basic pro aplikace klepněte na Vložit > Modul. Poté zkopírujte a vložte níže uvedený kód VBA do okna modulu.

Kód VBA: Vytiskne se pouze poslední stránka listu

Sub PrintLastPage()
Dim xPages As Long
xPages = ActiveSheet.PageSetup.Pages.Count
If xPages > 0 Then ActiveSheet.PrintOut from:=xPages, to:=xPages, preview:=True
End Sub

snímek obrazovky ukazující, jak používat kód VBA

3. zmáčkni F5 Chcete-li spustit kód, zobrazí se v rozbalovacím dialogovém okně Náhled tisku poslední stránka aktuálního listu. Klikněte prosím na Tisk zahájíte tisk. Viz screenshot:

snímek obrazovky ukazující výsledek


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


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!