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.
Program Successfully in Excel! John Walkenbach's name is synonymous with excellence in deciphering complex technical topics. With this comprehensive guide, "Mr. Spreadsheet" shows how to maximize your Excel experience using professional spreadsheet application development tips from his own personal bookshelf. Check out Excel 2013 Power Programming with VBA today!
Setting up a single footer line for your printouts is fairly easy. If you want to move part of the footer down a line so ...
Discover MoreToday's date is easy to add to a header, but what if you want to add a date that is adjusted in some manner? Adding ...
Discover MoreApplying color to the text in your headers and footers is a bit of a dream in some versions of Excel. Here's an overview ...
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 © 2021 Sharon Parq Associates, Inc.
Comments