HOW DO YOU GET A reference page to follow endnotes page?

  • Thread starter Thread starter cbaird
  • Start date Start date
C

cbaird

Windows XP Pro and Word 2000.

I want to insert a page break AFTER the last
endnote so I can have a "References" page as the
last page of the document. How do I do it?

Chuck
 
You have to set endnotes "end of section", then suppress endnotes for all
sections except the one you want to endnotes to follow.

Word 2000 doesn't have menu access to the "suppress endnotes" checkbox, so
you need to run a macro to set the sections to "suppress endnotes".

This macro will set endnotes to end of section and suppress endnotes for all
sections but the next-to-last section. If you want the endnotes to appear in
front of the last section, you can use this macro with no changes.

Sub AppendixAfterEndnotes()
'
' sets endnote location to end of section:
With ActiveDocument.Endnotes
.Location = wdEndOfSection
End With
' sets all sections to have endnotes suppressed:
ActiveDocument.Sections.PageSetup.SuppressEndnotes = True
' tells Word not to suppress endnotes for the next to last (³numSections-1²)
section:
Dim numSections
numSections=ActiveDocument.Sections.Count
If numSections> 1 then
ActiveDocument.Sections(numSections-1).PageSetup.SuppressEndnotes = False
End if
End Sub

If you perhaps have several sections (e.g. an index AND a bibliography)
after the notes, you will need to modify the code slightly. If you want the
endnotes to appear in front of two or three sections, then you may need to
change the code to read ³(numSections-2)² or ³(numSections-3)²,
respectively.

See also, if necessary:
What do I do with macros sent to me by other newsgroup readers to help me
out?
I don't know how to install them and put them to use
http://word.mvps.org/FAQs/MacrosVBA/CreateAMacro.htm

DM
 
Back
Top