Hi =?Utf-8?B?YmlsaXNh?=,
A filename field in my document header. Im using version 2003 small Business
edition.
The simplest way would be to have a macro named FileSaveAs (since updating the
name is really only relevant when saving the file to a new location or name). A
macro named the same as a toolbar command overrides the built-in behavior, so:
Sub FileSaveAs()
Dialogs(wdDialogFileSaveAs).Show
For each sec in ActiveDocument.Sections
sec.Headers(wdHeaderFooterPrimary).Range.Fields.Update
sec.Headers(wdHeaderFooterFirstPage).Range.Fields.Update
Next
End Sub
Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister (last update Jun 8 2004)
http://www.word.mvps.org
This reply is posted in the Newsgroup; please post any follow question or reply
in the newsgroup and not by e-mail