Using Path Location in a Footer

  • Thread starter Thread starter Excel Guru
  • Start date Start date
E

Excel Guru

I want to insert the entire path of a file in my footer,
example F:/marketing/shared/project/january 2004

Thank you
 
Put this in your ThisWorkbook code module (right-click on the
workbook title bar and select View Code):

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim wkSht As Worksheet
For Each wkSht In ActiveWindow.SelectedSheets
wkSht.PageSetup.LeftFooter = ActiveWorkbook.Path
Next wkSht
End Sub

This will then update every time you print or print preview.
 
Back
Top