ADDING FILE DIRECTORY INFO INTO FOOTER

[JonRowland]

Hi,

Is there an easy formula or similar which can be used in an Excel footer in order to show the file directory & filename details?

Thanks

Jon

 

[al_b_cnu]

Hi,

Put this event in the 'ThisWorkBook' module:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim S As Worksheet
For Each S In ThisWorkbook.Sheets
    S.PageSetup.LeftFooter = "&8" & ThisWorkbook.FullName
Next S
End Sub

The '&8" sets the font size to 8.

HTH

Alan

 

[JonRowland]

Thanks will try it

Jon