This code, placed in the ThisWorkbook code module, automatically picks up
the cell value when printing.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftFooter = Activeworkbook.FullName
End Sub

--

HTH

RP
(remove nothere from the email address if mailing direct)


"bill_morgan_3333" wrote in
message ...
Friends,

Is there a way to insert not only the file name but also the path into an
Excel Worksheet footer (like you can in Word)?

Thanks,

Bill Morgan