Thread: Custom Footer
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.misc
Jim May Jim May is offline
external usenet poster
 
Posts: 430
Default Custom Footer

I use:

Sub pathinfooter()
ActiveSheet.PageSetup.RightFooter = "&08 &" & Chr(34) & _
"Times New Roman" & Chr(34) & _
ActiveWorkbook.FullName & " " & ActiveSheet.Name
End Sub

In a standard module of my Personal.xls file - Also a Custom Button on
My toolbar runs "pathinfotter" when I need it.



"Andrew Mackenzie" wrote in message
:

Hi, I hope someone can help.

I am trying to put a custom footer in an excel spreadsheet giving the
filename and the path but it seems that I can only put the filename without
the path. Do I have to live with this?

Thanks,

Andrew.