Thread: Custom Footer
View Single Post
  #7   Report Post  
Posted to microsoft.public.excel.misc
gator gator is offline
external usenet poster
 
Posts: 66
Default Custom Footer

Is there a way to set this code where is will automatically work in Excel
anytime or do I have add it to each workbook I want to use it in. Also, do I
need to assign the code to a macro?
--
Gator


"ShaneDevenshire" wrote:

Hi again,

The code if you want that is

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.Path
End Sub

--
Thanks,
Shane Devenshire


"Gator" wrote:

What do I use to add the directory as a custom footer in the View/Header
Footer...I've used &[Path] and that doesn't work. I see a button to add the
file name...that's easy...but I can't get the directory on there.
--
Gator