Tip: Other languages are Google-Translated. You can visit the English version of this link.
Log in
x
or
x
x
Register
x

or

How to set print area to last row in Excel?

In Excel, by default, it will set the whole worksheet until the last row with data as print area. But in this case, I want to print from column A to column C until the last row with data as below screenshot shown, are there any ways to handle it?
doc print last row 1
doc print last row 2

Enable you to do smarter, faster and better

Kutools - the best office productivity tool brings 300 advanced features to Excel. Details... Download...

Office Tab - brings tabbed interface to Excel and Word, make your work much easier. Details...Download...

Set print area to the last row with data by Print Selection

Set print area to the last row with data by VBA


Set print area to the last row with data by Print Selection


To print a selection to the last row with data, you can change the print area to the specified selection before printing.

1. Hold Ctrl key then select the columns you want to print. See screenshot:
doc print last row 3

2. Click File > Print, and then choose Print Selection from the Setting section. See screenshot:
doc print last row 4


Set print area to the last row with data

Here I introduce a macro code to do this operation too.

1. Enable the sheet you use, press Alt + F11 keys to open Microsoft Visual Basic for Applications window, and click Insert > Module. See screenshot.
doc print last row 5

2. Paste below code to the Module script, and press F5 key to run.

VBA: Set Area to last row

'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

 

doc print last row 6

3. A dialog pops out to remind you to select column range you want to use. See screenshot:
doc print last row 7

4. Click OK, the print area has been set.


good idea4Select Last Cells

Kutools' Select Last Cells function can quickly help you to select the last cell or the last column or last row.
doc select last cell


Excel Productivity Tools

Kutools for Excel - The Best Office Productivity Tool

  • Brings 300 powerful advanced features to Excel, enable you to do smarter, faster and better.
  • No longer need memorizing formulas and VBA codes, give your brain a rest from now on.
  • Become an Excel expert in 3 minutes, Complicated and repeated operations can be done in seconds, 
  • Reduce thousands of keyboard & mouse operations every day, say goodbye to occupational diseases now.
  • 110,000 highly effective people and 300+ world-renowned companies' choice.
  • 60-day full features free trial. 60-day money back guarantees. 2 years of free upgrade and support.

Office Tab - brings tabbed interface to Office, make your work much easier.

  • Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
  • Open and create multiple documents in new tabs of the same window, rather than in new windows.
  • Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.