Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Word / Programming / August 2005

Tip: Looking for answers? Try searching our database.

Updating Footers using a Macro

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Mark64 - 24 Aug 2005 23:46 GMT
I have a document divided into several sections, each section with a
different footer.  The footers contain Cross References to text in the main
document (they are not Links, they are Fields).  Does anyone know how to
create a macro that will go through each of the sections and select the
entire contents of the footer and update the entire footer in each section.  
I would like one macro that can do this.  Right now I am selecting the
footers individually and updating them manually, which takes awhile.  Or does
anyone know how to make the Fields in the Header and Footer automatically
update when the information has changed (not by printing).  Either way would
be good.  

Thank you
Jezebel - 24 Aug 2005 23:51 GMT
Dim pRange as Word.Range
For each pRange in ActiveDocument.StoryRanges
   Do until pRange is nothing
       pRange.Fields.Update
       set pRange = pRange.NextStoryRange
   Loop
Next

>I have a document divided into several sections, each section with a
> different footer.  The footers contain Cross References to text in the
[quoted text clipped - 12 lines]
>
> Thank you
Mark64 - 25 Aug 2005 04:24 GMT
Thanks Jezebel, that works awesome.

> Dim pRange as Word.Range
> For each pRange in ActiveDocument.StoryRanges
[quoted text clipped - 20 lines]
> >
> > Thank you
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.