Please Note: This article is written for users of the following Microsoft Excel versions: 2007, 2010, 2013, and 2016. 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: Selective Headers and Footers.

Selective Headers and Footers

by Allen Wyatt
(last updated February 20, 2016)

1

One of the long-time complaints about Excel is that it doesn't have a very robust method of creating and managing headers and footers. Consider the following scenario: You want to print your worksheet, but only have page numbers beginning on the second page.

There is no intrinsic method in Excel to handle this situation. There are some workarounds; for instance, you could put your first page on one worksheet (without headers or footers) and the subsequent pages on a different worksheet (which includes headers and footers). You could then print the two worksheets in one pass, and effectively achieve your goal.

If you prefer, you can create a macro that prints your worksheet as you desire. The following macro, GoodPrint, will print the first page of a worksheet without headers or footers, and then all subsequent pages as normal.

Sub GoodPrint()
    Dim hlft As String
    Dim hctr As String
    Dim hrgt As String
    Dim flft As String
    Dim fctr As String
    Dim frgt As String

    'save current header
    hlft = ActiveSheet.PageSetup.LeftHeader
    hctr = ActiveSheet.PageSetup.CenterHeader
    hrgt = ActiveSheet.PageSetup.RightHeader

    'save current footer
    flft = ActiveSheet.PageSetup.LeftFooter
    fctr = ActiveSheet.PageSetup.CenterFooter
    frgt = ActiveSheet.PageSetup.RightFooter

    'remove header and footer
    With ActiveSheet.PageSetup
        .CenterHeader = ""
        .RightHeader = ""
        .LeftHeader = ""
        .CenterFooter = ""
        .RightFooter = ""
        .LeftFooter = ""
    End With

    'print page one
    ActiveSheet.PrintOut 1, 1

    'restore header and footer
    With ActiveSheet.PageSetup
        .LeftHeader = hlft
        .CenterHeader = hctr
        .RightHeader = hrgt
        .LeftFooter = flft
        .CenterFooter = fctr
        .RightFooter = frgt
    End With

    'print the rest of the pages
    ActiveSheet.PrintOut 2
End Sub

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 (12101) applies to Microsoft Excel 2007, 2010, 2013, and 2016. You can find a version of this tip for the older menu interface of Excel here: Selective 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

Closing a Read-Only Workbook

When you create a workbook that is read-only, users can still make changes to the workbook. When they exit, they are ...

Discover More

Positioning Headers and Footers

Headers and footers can add a finishing touch to your printed documents. Here's how you can position those headers and ...

Discover More

Can't Save Edited Document

Each day of using Word is filled with opening documents, editing them, and then saving those changes to disk. So it can ...

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 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

Copying Headers and Footers

Need to copy headers and footers from one worksheet to another? How about from one workbook to another? Here are some ...

Discover More

Roman Numerals for Page Numbers

Yes, Excel can work with Roman numerals, and it even provides a worksheet function that converts to them. How you use ...

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 9 + 2?

2016-02-20 10:33:16

Robert Ch

You can have a "different first page" without using macros.
On the print, page setup, go to the tab "Header/Footer" and place a tick mark on "Different first page"
Then, when you select "Custom Header" or "Custom Footer" you will have an option to do a generic header/footer and another tab with "First Page Header/Footer"


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.