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 / Long Documents / April 2004

Tip: Looking for answers? Try searching our database.

Same as Previous

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Gladys - 08 Mar 2004 16:48 GMT
I have a long document and I have A LOT OF different
sections. Each Section has different footer information.
Is there a way to turn off the option Same as Previous as
a default setting so I don't have to do that to each
footer.

Word XP
Dayo Mitchell - 08 Mar 2004 17:15 GMT
No, write mswish@microsoft.com and complain about it.  Maybe someday they
will listen.

Note that the header/footer toolbar has "show next" "show prev" icons which
make it easier to go through this process, if still annoyingly repetitive.

If your different footer information is a chapter title or follows some
other pattern, you might be able to use a StyleRef field instead, which
picks up the nearest instance of a designated style.  Then you only enter
one StyleRef field and the text of it changes by section, instead of
entering separate text in each section.  Then same as previous works for you
instead of against you.

Hope that helps,
DM

> I have a long document and I have A LOT OF different
> sections. Each Section has different footer information.
[quoted text clipped - 3 lines]
>
> Word XP
Jay Freedman - 09 Mar 2004 03:09 GMT
Hi, Gladys,

As is often the case, there are ways to do what you want with a macro.
Then you can assign a toolbar button or keyboard shortcut to the macro
and it becomes just as convenient as a built-in command.

This one inserts a next-page section break and sets all three possible
footers to _not_ Same As Previous:

Sub InsertSectDiffFooter()
   Dim oSec As Section
   Selection.InsertBreak wdSectionBreakNextPage
   Set oSec = Selection.Sections(1)
   oSec.Footers(wdHeaderFooterPrimary) _
       .LinkToPrevious = False
   oSec.Footers(wdHeaderFooterFirstPage) _
       .LinkToPrevious = False
   oSec.Footers(wdHeaderFooterEvenPages) _
       .LinkToPrevious = False
End Sub

This one changes any Same As Previous footers in the document; there's
no problem using it repeatedly as you add more sections:

   Dim oSec As Section
   For Each oSec In ActiveDocument.Sections
       oSec.Footers(wdHeaderFooterPrimary) _
           .LinkToPrevious = False
       oSec.Footers(wdHeaderFooterFirstPage) _
           .LinkToPrevious = False
       oSec.Footers(wdHeaderFooterEvenPages) _
           .LinkToPrevious = False
   Next oSec
End Sub

If you need instructions, see these articles:

http://www.gmayor.com/installing_macro.htm
http://word.mvps.org/FAQs/Customization/AsgnCmdOrMacroToToolbar.htm
http://word.mvps.org/FAQs/Customization/AsgnCmdOrMacroToHotkey.htm

>No, write mswish@microsoft.com and complain about it.  Maybe someday they
>will listen.
[quoted text clipped - 19 lines]
>>
>> Word XP

--
Regards,
Jay Freedman
Microsoft Word MVP        FAQ: http://www.mvps.org/word
Dayo Mitchell - 09 Mar 2004 05:31 GMT
And I just had an epiphany about using macros to replace the missing Format
Section dialog, but totally forgot about it!  I'd better build my Format
Section toolbar sooner rather than later.... thanks, Jay.

Dayo

> Hi, Gladys,
>
[quoted text clipped - 65 lines]
> Jay Freedman
> Microsoft Word MVP        FAQ: http://www.mvps.org/word
Jay Freedman - 09 Mar 2004 14:05 GMT
Hi, Dayo,

That sounds like a goodie. Please send me a copy!

>And I just had an epiphany about using macros to replace the missing Format
>Section dialog, but totally forgot about it!  I'd better build my Format
>Section toolbar sooner rather than later.... thanks, Jay.
>
>Dayo

--
Regards,
Jay Freedman
Microsoft Word MVP        FAQ: http://www.mvps.org/word
Dayo Mitchell - 09 Mar 2004 18:18 GMT
Well, right now it's mostly a concept, with code snagged from other people's
macros.  :) But I'm playing around with it. What else is a hassle or
impossible via the GUI, other than features related to un/linking headers
and suppressing endnotes?

Dayo

> Hi, Dayo,
>
[quoted text clipped - 10 lines]
> Jay Freedman
> Microsoft Word MVP        FAQ: http://www.mvps.org/word
rlampky - 04 Apr 2004 22:37 GMT
In regards to the first example. What would I need to add to cause this to
find the last page of the document, add the new page and then insert a
autotext entry or a document into that last page?

> Hi, Gladys,
>
[quoted text clipped - 65 lines]
> Jay Freedman
> Microsoft Word MVP        FAQ: http://www.mvps.org/word
 
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.