Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Auto Path in Footer
Karen, try this
Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftFooter = "&""Arial""&8 " & ActiveWorkbook.FullName End Sub -- Paul B Always backup your data before trying something new Using Excel 97 & 2000 Please post any response to the newsgroups so others can benefit from it ** remove news from my email address to reply by email ** "Karen" wrote in message ... I use the following code to enter the network path into the footer of my worksheet Private Sub Workbook_BeforePrint(Cancel As Boolean) ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName End Sub How can I change the code so it does not use the default font size? The default is currently 10 and I want the path to be 8 Thank you |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
full UNC path in footer | Excel Discussion (Misc queries) | |||
Path in page footer | Excel Discussion (Misc queries) | |||
Path and File Name to Footer | Excel Discussion (Misc queries) | |||
Footer - FileName and Path | Excel Discussion (Misc queries) | |||
Entering Path Name in Footer | Excel Worksheet Functions |