Skip to main content

How to print multiple selections on one page in Excel?

If you have a large worksheet which contains much data, and now, you want to print some selected ranges which are non-continuous in one page, so that you can save much paper. Excel provides the Set Print Arear feature for us to print multiple selections at once, but, each selected ranges will be printed into one page separately. This article will talk about how to print multiple non-continuous selections on one page.

Print multiple selections from one worksheet on one page with VBA code

Print multiple selections from one or multiple worksheets on one page with Kutools for Excel


Print multiple selections from one worksheet on one page with VBA code

To print multiple selected non-contiguous selections of one worksheet in one page, the following VBA code may help you, please do as follows:

1. Press Ctrl key to select the ranges that you want to print.

2. Hold down the ALT + F11 keys, and it opens the Microsoft Visual Basic for Applications window.

3. Click Insert > Module, and paste the following code in the Module Window.

VBA code: Print multiple selections into one page

Sub PrintOutRange()
'Updateby Extendoffice
Dim xRng1 As Range
Dim xRng2 As Range
Dim xNewWs As Worksheet
Dim xWs As Worksheet
Dim xIndex As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWs = ActiveSheet
Set xNewWs = Worksheets.Add
xWs.Select
xIndex = 1
For Each xRng2 In Selection.Areas
    xRng2.Copy
    Set xRng1 = xNewWs.Cells(xIndex, 1)
    xRng1.PasteSpecial xlPasteValues
    xRng1.PasteSpecial xlPasteFormats
    xIndex = xIndex + xRng2.Rows.Count
Next
xNewWs.Columns.AutoFit
xNewWs.PrintOut
xNewWs.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

4. Then press F5 key to run this code, and your selected ranges will be printed at once, and they will be printed into a single page.


Print multiple selections from one or multiple worksheets on one page with Kutools for Excel

The above code only can help you to print the selected ranges from one worksheet, if you want multiple selections from several worksheets to be printed into one page, the above code will not work. Please don’t worry, here, I can introduce you a handy tool – Kutools for Excel, with its Print Multiple Selection Wizard utility, you can print the selections from one worksheet or multiple worksheets into one page at once.

Kutools for Excel : with more than 300 handy Excel add-ins, free to try with no limitation in 30 days

After installing Kutools for Excel, please do with following steps:

1. Click Kutools Plus > Printing > Print Multiple Selection Wizard, see screenshot:

2. In the Print Multiple Selection Wizard, clickdoc add button button to select and add the range that you want to print into the Ranges to print list box one by one, (you can select the ranges from one worksheet or multiple worksheets ), click doc remove button button can remove the ranges you don’t need, see screenshot:

doc print multiple selections 2

3. After adding the selections into the list box, please click Next >> button to go to step 2 of the wizard, specify the print settings as you need, and you can add a blank row between the selected ranges by check Add a blank row between ranges option, see screenshot:

doc print multiple selections 3

4. Then go on clicking Next >> butoon, in step 3 of the wizard, specify the action for the temporary worksheet, you can active the worksheet but don’t print, print the worksheet and keep it or print the worksheet and delete it. See screenshot:

doc print multiple selections 4

5. Click Finish button, all of the selected ranges have been pasted into a new worksheet as a linked picture objects. And you can drag and rearrange them in the worksheet. See screenshot:

doc print multiple selections 5

6. When you print this new worksheet, the ranges will be printed into one single page as you need.

Click to know more about this Print Multiple Selection Wizard utility.

Download and free trial Kutools for Excel Now !


Demo: Print multiple selections from one or multiple worksheets on one page with Kutools for Excel

Kutools for Excel: with more than 300 handy Excel add-ins, free to try with no limitation in 30 days. Download and free trial Now!

Best Office Productivity Tools

🤖 Kutools AI Aide: Revolutionize data analysis based on: Intelligent Execution   |  Generate Code  |  Create Custom Formulas  |  Analyze Data and Generate Charts  |  Invoke Kutools Functions
Popular Features: Find, Highlight or Identify Duplicates   |  Delete Blank Rows   |  Combine Columns or Cells without Losing Data   |   Round without Formula ...
Super Lookup: Multiple Criteria VLookup    Multiple Value VLookup  |   VLookup Across Multiple Sheets   |   Fuzzy Lookup ....
Advanced Drop-down List: Quickly Create Drop Down List   |  Dependent Drop Down List   |  Multi-select Drop Down List ....
Column Manager: Add a Specific Number of Columns  |  Move Columns  |  Toggle Visibility Status of Hidden Columns  |  Compare Ranges & Columns ...
Featured Features: Grid Focus   |  Design View   |   Big Formula Bar    Workbook & Sheet Manager   |  Resource Library (Auto Text)   |  Date Picker   |  Combine Worksheets   |  Encrypt/Decrypt Cells    Send Emails by List   |  Super Filter   |   Special Filter (filter bold/italic/strikethrough...) ...
Top 15 Toolsets12 Text Tools (Add Text, Remove Characters, ...)   |   50+ Chart Types (Gantt Chart, ...)   |   40+ Practical Formulas (Calculate age based on birthday, ...)   |   19 Insertion Tools (Insert QR Code, Insert Picture from Path, ...)   |   12 Conversion Tools (Numbers to Words, Currency Conversion, ...)   |   7 Merge & Split Tools (Advanced Combine Rows, Split Cells, ...)   |   ... and more

Supercharge Your Excel Skills with Kutools for Excel, and Experience Efficiency Like Never Before. Kutools for Excel Offers Over 300 Advanced Features to Boost Productivity and Save Time.  Click Here to Get The Feature You Need The Most...

Description


Office Tab Brings Tabbed interface to Office, and 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!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
how to print selection area with multi print ? i means selection area i wan to print 10 times
This comment was minimized by the moderator on the site
I tried your VBA code with Excel 2016 and I get an error: Compile Error: Sub of Function not defined. This line is highlighted: Set xRng1 = xNewWs.Cells(xIndex, 1)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations