View Single Post
  #2   Report Post  
Posted to microsoft.public.word.formatting.longdocs
Doug Robbins - Word MVP Doug Robbins - Word MVP is offline
external usenet poster
 
Posts: 8,832
Default Insert section break

Running a macro with the following code when the selection is at the point
where you want to insert the section break will insert the break and unlink
the headers and footers from those in the previous section. Note, the
headers and footers will still contain the same text as those in the
previous section, but it can be edited/deleted without affecting that in the
previous section.

Dim i As Long
Selection.InsertBreak Type:=wdSectionBreakNextPage
With ActiveDocument
i = .Sections.Count
With .Sections(i)
.Headers(wdHeaderFooterFirstPage).LinkToPrevious = False
.Headers(wdHeaderFooterPrimary).LinkToPrevious = False
.Footers(wdHeaderFooterFirstPage).LinkToPrevious = False
.Footers(wdHeaderFooterPrimary).LinkToPrevious = False
End With
End With

If you want the new headers and footers to be blank, use

Dim i As Long
Selection.InsertBreak Type:=wdSectionBreakNextPage
With ActiveDocument
i = .Sections.Count
With .Sections(i)
.Headers(wdHeaderFooterFirstPage).LinkToPrevious = False
.Headers(wdHeaderFooterFirstPage).Range.Delete
.Headers(wdHeaderFooterPrimary).LinkToPrevious = False
.Headers(wdHeaderFooterPrimary).Range.Delete
.Footers(wdHeaderFooterFirstPage).LinkToPrevious = False
.Footers(wdHeaderFooterFirstPage).Range.Delete
.Footers(wdHeaderFooterPrimary).LinkToPrevious = False
.Footers(wdHeaderFooterPrimary).Range.Delete
End With
End With



--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"Bernie Dwyer" wrote in message
...
Hello! My wife is editing a 327-page book, and is rapidly learning about
some of Word's quirkier features :-)

This is Word 2000.

Is there a way to insert a "next page section break" (for chapter
breaks) without having the new section having the "same as previous"
button set (in header and footer), i.e. how to insert a section break
that isn't populated with the same headers and footers as the previous
section? I've done a quick search of this group, some of the other word
groups, and searched word.mvps.org, but no luck.

Is it possible to intercept the "insert break" function with a macro to
do what she wants? If so, has anyone else done it already?

Thanks

--

Bernie Dwyer
There are no 'z' in my address