Please Note: This article is written for users of the following Microsoft Excel versions: 97, 2000, 2002, and 2003. If you are using a later version (Excel 2007 or later), this tip may not work for you. For a version of this tip written specifically for later versions of Excel, click here: Automatic Selection of Portrait or Landscape.
by Allen Wyatt
(last updated January 1, 2021)
Barbara has a worksheet that she needs to print out periodically. Sometimes she needs to only print three columns of data and other times she needs to print more. When she prints only three columns they fit very nicely on a page printed in portrait orientation. When she prints more columns then she needs to print in landscape orientation. Barbara wonders if there is a way she can set up Excel so that it automatically switches from portrait to landscape based upon the number of columns she wants to print.
Perhaps the easiest way to handle this type of printing is to add a little macro that runs just before printing. If the print area is set so that it contains 1, 2, or 3, columns, then the printout is done in portrait orientation. Any other number of columns and landscape orientation is used. Here is the macro; you should add it to the ThisWorkbook module:
Private Sub Workbook_BeforePrint(Cancel As Boolean) With ActiveSheet.PageSetup If Range(.PrintArea).Columns.Count > 3 Then .Orientation = xlLandscape Else .Orientation = xlPortrait End If End With End Sub
Of course, it may be more beneficial (and flexible) if you simply use the Custom Views feature of Excel. You can specify a view that includes your three columns or any number of columns you want. You can even have the view include print settings, so the orientation of the page would be included in the view. Follow these steps to set up the views:
Figure 1. The Add View dialog box.
Now, whenever you want to print different ways, you just call up the view you want and choose to print—everything else is already set for you.
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (10364) applies to Microsoft Excel 97, 2000, 2002, and 2003. You can find a version of this tip for the ribbon interface of Excel (Excel 2007 and later) here: Automatic Selection of Portrait or Landscape.
Save Time and Supercharge Excel! Automate virtually any routine task and save yourself hours, days, maybe even weeks. Then, learn how to make Excel do things you thought were simply impossible! Mastering advanced Excel macros has never been easier. Check out Excel 2010 VBA and Macros today!
Page orientation controls the way in which information is printed on the page. Here's how you can control the page ...Discover More
When printing a worksheet, you may want to rotate the output on the page to fit a certain orientation. Excel doesn't ...Discover More
Got a version of Excel that uses the menu interface (Excel 97, Excel 2000, Excel 2002, or Excel 2003)? This site is for you! If you use a later version of Excel, visit our ExcelTips site focusing on the ribbon interface.