Multiple line footers (Excel 97)

Topic

New Reply

Using the BeforePrint event to add the full pathname is useful. However, in doing so the full system-wide path designation is rather lengthy. That’s fine. However it bumps into the right-side time and date stamp I like to have in the footer (even when the path is located in the LeftFooter location.) I have taken a few stabs at “bumping down” the time/date lines to no avail. My question to experienced users: Can the footer line be in fact expanded? Or are we constrained to one slim line of data? To reduce the font size of the path is an obvious option, but would render the information illegible, especially after copying. Also, my preference is to avoid header time and date stamps, since the header is for more formal titles and so on.
Thank you for your suggestions.

Reply | Quote

Replies

just include a CHR(10) somewhere in your setting. If you START with CHR(10), then the footer will be below other lines.
Activesheet.pagesetup.leftfooter=chr(10) & activeworkbook.fullname

Reply | Quote

You can have multiple line footers, just make sure you allow enough space when setting the margins !.

In your BeforePrint routine you can use the VBA constant VbCrLf which inserts a carriage Return and Line Feed. The following code is an example :

With ActiveSheet.PageSetup
    .LeftFooter = strFilePath & VbCrLf & "&D - &T" 
    'further code if required
End With

where strFilePath is a string variable holding the path & file name.

Andrew C

Reply | Quote

Not clear on what you want to do; there’s no reason you can’t use two lines in a header or footer:

.CenterFooter = “&8″ & ActiveWorkbook.FullName & ” ~&A” & Chr(10) & “

Reply | Quote

OK! Thanks everybody..let me work on those ideas.

Reply | Quote