If you use a macro code to set your header or footer, you can designate more than one line for them. Thus, you could have a two or three line header or footer, if desired. You do this by simply including the code Chr(13) into the string you use to set the header or footer. When used with the command codes discussed in other issues of ExcelTips, this is very powerful, indeed.
For instance, let's say you wanted a centered header that included your company name on the first line with today's date on the second. You would use the following code:
ActiveSheet.PageSetup.CenterHeader = "&C&BAmalgamated Widgets, Inc.&B" & Chr(13) & "&D"
Note the use of the &B command code to make the company name bold. The second use of the command code is to turn the bold attribute off, so that the date does not end up being bold. Also, note the use of the &C command code. Remember that the use of positioning command codes such as these overrides placement. Thus, the following code (which would normally place the information at the left side of the header) has the exact same results as the previous code:
ActiveSheet.PageSetup.LeftHeader = "&C&BAmalgamated Widgets, Inc.&B" & Chr(13) & "&D"
Note:
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (1992) applies to Microsoft Excel 97, 2000, 2002, and 2003.
Professional Development Guidance! Four world-class developers offer start-to-finish guidance for building powerful, robust, and secure applications with Excel. The authors show how to consistently make the right design decisions and make the most of Excel's powerful features. Check out Professional Excel Development today!
When preparing a worksheet for printing, you may want to include in the header or footer the last date the workbook was ...
Discover MoreWhen printing out a worksheet, you may want Excel to include, in the footer, the date the data was last saved. There is ...
Discover MoreWhen adding headers or footers to your worksheets, you may want to include the date that the workbook was last edited. ...
Discover MoreFREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
2018-11-30 10:09:56
laura
The first one doesn't work, the second one works. the only difference is left part of equal sign. the right parts are the same. is it because the text is too long? but how come the second one works? anyone can help? thanks!
.LeftFooter ="&6" & "For Investment Professional use only, not to be shown or distributed to clients, prospective clients, or the general public." & Chr(13) & "Performance shown is net of Fund fees and expenses, except where indicated. Past performance does not guarantee future results."
.FirstPage.LeftFooter.Text = "&6" & "For Investment Professional use only, not to be shown or distributed to clients, prospective clients, or the general public." & Chr(13) & "Performance shown is net of Fund fees and expenses, except where indicated. Past performance does not guarantee future results."
2018-11-29 16:52:05
laura
The first one doesn't work, the second one works. the only difference is left part of equal sign. the right parts are the same. is it because the text is too long? but how come the second one works? anyone can help? thanks!
.LeftFooter ="&6" & "For Investment Professional use only, not to be shown or distributed to clients, prospective clients, or the general public." & Chr(13) & "Performance shown is net of Fund fees and expenses, except where indicated. Past performance does not guarantee future results."
.FirstPage.LeftFooter.Text = "&6" & "For Investment Professional use only, not to be shown or distributed to clients, prospective clients, or the general public." & Chr(13) & "Performance shown is net of Fund fees and expenses, except where indicated. Past performance does not guarantee future results."
2018-11-29 16:45:51
laura
The first one doesn't work, the second one works. the only difference is left part of equal sign. the right parts are the same. is it because the text is too long? but how come the second one works? anyone can help? thanks!
.LeftFooter ="&6" & "For Investment Professional use only, not to be shown or distributed to clients, prospective clients, or the general public." & Chr(13) & "Performance shown is net of Fund fees and expenses, except where indicated. Past performance does not guarantee future results."
.FirstPage.LeftFooter.Text = "&6" & "For Investment Professional use only, not to be shown or distributed to clients, prospective clients, or the general public." & Chr(13) & "Performance shown is net of Fund fees and expenses, except where indicated. Past performance does not guarantee future results."
2018-11-29 16:37:39
laura
I have two exact the same statements using Chr(13) in the same module for two different pages, one statement works the other doesn't work. can 't figure out why. any thoughts?
2017-09-28 13:54:16
Mark
I have the following line in my macro code:
With ActiveSheet.PageSetup
.CenterHeader = "&F" & Chr(10) & "&A"
This seems to follow the format mentioned above, but I only get the filename and nothing else. The macro doesn't error out, it just doesn't put the carriage return and tab name in. I realize this is using Chr(10), but I've also tried Chr(13) to no avail. Any thoughts?
2015-03-27 09:58:05
Chuck Siegmann
This is great, but how do you create multiple heared lines when you don't use macro codes to set the headers and footers. Limitations like this is why i spend so much time creating tables in Word.
2014-11-18 10:12:23
Don
It's frustrating when you have ads that cover up text in your article.
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.
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2019 Sharon Parq Associates, Inc.
Comments