Hi Frank!

I am trying to insert the file path in my page footer and followed the
instructions from McGimpsey's "Automatic Method - Per Workbook", but I'm
getting an error message: Run-time error '50290': Method 'FullName' of object
'_Workbook' failed.

I placed the code in ThisWorkbook as instructed, and I believe I've typed it
correctly (but I'll paste it here just in case I've missed something). Any
thoughts?

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim wsSht As Worksheet
For Each wsSht In ActiveWindow.SelectedSheets
wsSht.PageSetup.LeftFooter = Me.FullName
Next wsSht
End Sub

"Frank Kabel" wrote:

Hi
see:
http://www.mcgimpsey.com/macoffice/e...einfooter.html

--
Regards
Frank Kabel
Frankfurt, Germany

"GirlFriday" schrieb im
Newsbeitrag ...
I am trying to put a code into the footer that will automatically put
the
path and file name in an Excel spreadsheet. I know that this is a
function
available in the 2002 version, but I have to work in 2000 for very
specific
reasons. Is this possible? Can anybody help me figure this out?

Thank you.