SORRY: LEFT OUT MACRO Changing footer w/ macro
Posted by Dwight on March 21, 2001 1:00 PM
Wrote a macro to change existing footer (this would be for spreadsheets I didn't create) to one which has fullname/path on left, nothing in center, page/date on right, all in 8 point TNR font. Works fine except I can't figure where to put the "&8" for the left section to get the font size to 8 point.
ActiveSheet.PageSetup.LeftFooter = "&8Test"
ActiveSheet.PageSetup.LeftFooter = ""
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
ActiveSheet.PageSetup.CenterFooter = ""
ActiveSheet.PageSetup.RightFooter = ""
ActiveSheet.PageSetup.RightFooter = "&8Page &P of &N &D &T"
Can someone help?