Results 1 to 2 of 2
Thread: endnote header in Word 2007
2010-05-15, 09:44 #1
- Join Date
- May 2010
- Thanked 0 Times in 0 Posts
I have a long document in Word 2007, divided into chapters, with many endnotes at the end of the document. I want to set up a header for the endnotes section, and change it from page to page (to indicate what chapter the notes on that page are from, etc.). Two questions:
1) Is there a way to do that -- to make the endnote header vary from page to page?
2) If not, I can make the endnotes a separate file, and then set up my header. But if I do that, all the endnote numbers change to 1. Is there a way to preserve the numbers if I make the endnotes into a new file?
2010-05-15, 11:51 #2
- Join Date
- Feb 2001
- Silicon Valley, USA
- Thanked 93 Times in 89 Posts
Hmmm, I had an idea that if you inserted numbering into the endnotes, you then could cut and paste them into the document body for final formatting. Unfortunately, during that process, you still get a 1 at the beginning of each line. But perhaps it's better than nothing?
Sub EndnotesAddSeq() Dim en As Word.Endnote, intSec As Integer With ActiveDocument For Each en In .Endnotes intSec = en.Reference.Sections(1).Index en.Range.Select With Selection .Collapse wdCollapseStart .TypeText ". " .MoveLeft wdCharacter, 2 End With .Fields.Add Selection.Range, wdFieldSequence, "enSec" & intSec Next End With End Sub