VBA Code-Filename In Header/Footer/Cell (2000)

[jlkirk]

Not to rehash an old topic, but does someone have some good VBA code to insert the current filename in a (1) header/footer, and/or a (2) cell?
Thanks,
Jeff

[Hans Pottel]

Just search for 'filename in header' and you will find many previous posts dealing with the subject. John Walkenbach has an interesting add-in that you can find <A target="_blank" HREF=http://www.j-walk.com/ss/excel/files/addpath.htm> here </A>.

[LegareColeman]

Something like this:

<pre>Worksheets("Sheet1").PageSetup.centerheader = ActiveWorkbook.FullName
</pre>