Please Note: This article is written for users of the following Microsoft Excel versions: 2007, 2010, 2013, 2016, 2019, and Excel in Office 365. If you are using an earlier version (Excel 2003 or earlier), this tip may not work for you. For a version of this tip written specifically for earlier versions of Excel, click here: Dynamic Headers and Footers.

Dynamic Headers and Footers

by Allen Wyatt
(last updated June 6, 2015)

1

If you have a large worksheet, you may want to print it out in "parts" and automatically vary the information contained in the header or footer of each part. There is no intrinsic way to do this in Excel; the best approach is a macro to do the following:

  1. Set the print area based on a named range.
  2. Set the header or footer based on another named range.
  3. Print the print area.
  4. Repeat steps 1 through 3 for each desired print area.

Notice that these steps require the use of named ranges. You could have a named range for each portion of the worksheet that you want to print, and a named range (which would be a single cell) that represents the header or footer information that you want for each print area. The following macro will implement the above steps:

Sub PrintRegions()
    Dim x As Integer

'Change the dimension of the arrays to equal the number
'   of printing areas you have
    Dim Region(4) As String
    Dim Head(4) As String

'Fill this array with the names of the ranges to be printed
    Region(1) = "North"
    Region(2) = "South"
    Region(3) = "East"
    Region(4) = "West"

'Fill this array with the names of the ranges to be in the header
    Head(1) = "NorthHead"
    Head(2) = "SouthHead"
    Head(3) = "EastHead"
    Head(4) = "WestHead"

    For x = 1 To UBound(Region)
         ActiveSheet.PageSetup.PrintArea = Range(Region(x)).Address
         ActiveSheet.PageSetup.LeftHeader = Range(Head(x)).Value
         ActiveWindow.SelectedSheets.PrintOut Copies:=1
    Next
End Sub

This example prints out only four areas of a worksheet. These areas are named ranges: North, South, East, and West. Similarly, the named ranges—which are really single cells—used for the left portion of the headers are NorthHead, SouthHead, EastHead, and WestHead.

Note:

If you would like to know how to use the macros described on this page (or on any other page on the ExcelTips sites), I've prepared a special page that includes helpful information. Click here to open that special page in a new browser tab.

ExcelTips is your source for cost-effective Microsoft Excel training. This tip (10848) applies to Microsoft Excel 2007, 2010, 2013, 2016, 2019, and Excel in Office 365. You can find a version of this tip for the older menu interface of Excel here: Dynamic Headers and Footers.

Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He is president of Sharon Parq Associates, a computer and publishing services company. ...

MORE FROM ALLEN

Ranges on Multiple Worksheets

Referring to a range of cells on the current worksheet is easy. But what if you want to refer to a range on a number of ...

Discover More

Error in Linked PivotTable Value

Excel allows you to link to values in other workbooks, even if those values are in PivotTables. However, Excel may ...

Discover More

Determining the Horizontal Position of the Insertion Point

Need to figure out how far the insertion point is from the left margin? You can do so by using this small macro that ...

Discover More

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!

More ExcelTips (ribbon)

Adding Graphics to a Header or Footer

Excel makes it easy to add graphics to a header or footer. Here's the steps to make it happen.

Discover More

Sequential Page Numbers Across Worksheets

How do you want your page numbers to appear on your printed worksheets? Chances are good that you want them to be ...

Discover More

Adding Ampersands in Headers and Footers

Add an ampersand to the text in a header or footer and you may be surprised that the ampersand disappears on your ...

Discover More
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

View most recent newsletter.

Comments

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] in your comment text. You’ll be prompted to upload your image when you submit the comment. Maximum image size is 6Mpixels. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

What is six minus 3?

2017-05-17 17:39:09

Cam

Hey thanks so much Alan - this is excellent!

One unwanted by-product of this though is that the page number of the document (which I have in my footer) instead of numbering from 1 to 18, is now chopped into three i.e.; 1 to 3, 1 to 4, then 1 to 11.

Do you have any code suggestions as how to get round this?

kind regards

Cam


This Site

Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.

Newest Tips
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

(Your e-mail address is not shared with anyone, ever.)

View the most recent newsletter.