Jak nastavit oblast tisku na poslední řádek v aplikaci Excel?
V aplikaci Excel ve výchozím nastavení nastaví celý list až do posledního řádku s daty jako oblast tisku. Ale v tomto případě chci tisknout ze sloupce A do sloupce C až do posledního řádku s údaji uvedenými níže, existují nějaké způsoby, jak to zvládnout?
Nastavit oblast tisku na poslední řádek s daty výběrem tisku
Nastavte oblast tisku na poslední řádek s daty VBA
Nastavit oblast tisku na poslední řádek s daty výběrem tisku
Chcete-li vytisknout výběr na poslední řádek s daty, můžete před tiskem změnit oblast tisku na zadaný výběr.
1. Držet Ctrl poté vyberte sloupce, které chcete vytisknout. Viz snímek obrazovky:
2. cvaknutí Soubor > Tisk, a pak vyberte Výběr tisku z nastavení sekce. Viz screenshot:
Nastavte oblast tisku na poslední řádek s daty
Tady jsem zavést makro kód k provedení této operace taky.
1. Povolte list, který používáte, stiskněte Alt + F11 klíče k otevření Microsoft Visual Basic pro aplikace okno a klikněte na Vložit > Modul. Viz snímek obrazovky.
2. Vložte níže uvedený kód do Modul skript a stiskněte F5 klíč ke spuštění.
VBA: Nastavit oblast na poslední řádek
'UpdatebyExtendoffice20170811
Dim xRg As Range
Dim xRgLRow As Long
Dim xRgAddress As String
On Error Resume Next
xRgAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Select a range:", "KuTools For Excel", xRgAddress, , , , , 8)
xRg.Select
xRgLRow = xRg.SpecialCells(xlCellTypeLastCell).Row
xRgAddress = Left(xRg.Address(1, 1), Len(xRg.Address(1, 1)) - 2)
xRgAddress = xRgAddress & xRgLRow
ActiveSheet.PageSetup.PrintArea = xRgAddress
End Sub
3. Zobrazí se dialogové okno, které vám připomene, abyste vybrali rozsah sloupců, který chcete použít. Viz snímek obrazovky:
4. cvaknutí OK, byla nastavena oblast tisku.
Nejlepší nástroje pro produktivitu v kanceláři
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!