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 June 25, 2016)
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.
Solve Real Business Problems Master business modeling and analysis techniques with Excel and transform data into bottom-line results. This hands-on, scenario-focused guide shows you how to use the latest Excel tools to integrate data from multiple tables. Check out Microsoft Excel 2013 Data Analysis and Business Modeling today!
When printing a worksheet, you may want to rotate the output on the page to fit a certain orientation. Excel doesn't allow ...Discover More
Page orientation controls the way in which information is printed on the page. Here's how you can control the page ...Discover More
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
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.