Jak opakovaně tisknout řádky v dolní části každé vytištěné stránky v aplikaci Excel?

Ve výchozím nastavení poskytuje Excel uživatelům možnost opakovaně tisknout řádky nahoře. V některých případech však můžete upřednostňovat tisk řádků opakovaně na spodní části stránek, kromě nahoře. Tento článek vám ukáže malé triky.

Tiskněte řádky dole opakovaně s kódem VBA

Tiskněte řádky dole opakovaně s kódem VBA

Můžete spustit níže uvedený kód VBA a vložit zadaný řádek do zápatí každé stránky. A pak můžete tento řádek opakovaně vytisknout v dolní části každé vytištěné stránky v aplikaci Excel.

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

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

Kód VBA: Vložte zadaný řádek do zápatí každé vytištěné stránky

Sub MyFooter()
	Dim xTxt As String
	Dim xAddress As String
	Dim xRg As Range
	Dim xCell As Range
	On Error Resume Next
	xAddress = ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Select the row you will insert repeatedly at the bottom:", "Kutools for Excel", xAddress, , , , , 8)
	If xRg Is Nothing Then Exit Sub
		For Each xCell In xRg
			xTxt = xTxt & xCell.Value & " "
		Next
		ActiveSheet.PageSetup.LeftFooter = xTxt
	End Sub

3. zmáčkni F5 klíč ke spuštění kódu. Poté se zobrazí dialogové okno Kutools pro Excel, vyberte řádek, který potřebujete opakovaně tisknout v dolní části každé vytištěné stránky, a poté klikněte na OK .

Nyní je zadaný obsah řádku přidán do zápatí každé vytištěné stránky v aktuálním listu. Můžete začít tisknout list.

Poznámka: Pokud chcete vybraný obsah opakovaně vytisknout na konci každé stránky v celém sešitu, můžete použít funkci zápatí a vložit obsah do zápatí všech listů.

---

Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

• Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
• Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
• Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
• Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
• Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
• Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
• Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
• Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
• Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2021 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Plné funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.

Čtěte více... Stažení zdarma... Nákup... 

---

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!

Čtěte více... Stažení zdarma... Nákup...