Thread: End Note
View Single Post
  #2   Report Post  
Posted to microsoft.public.word.mailmerge.fields
Doug Robbins - Word MVP
 
Posts: n/a
Default End Note

Use the Location pulldown in the Insert EndNote dialog to set the location
to the End of the Section rather than the end of the Document in the mail
merge main document. In the Format section of that dialog, you will also
need to set the Numbering to restart at each section.

If that doesn't work, use the following macro on the main document to
convert the end note to a "text note"

' Macro created 29/09/99 by Doug Robbins to replace endnotes with textnotes
at end of document

' to replace the endnote reference in the body of the document with a
superscript number.

'

Dim aendnote As Endnote

For Each aendnote In ActiveDocument.Endnotes

ActiveDocument.Range.InsertAfter vbCr & aendnote.Index & vbTab &
aendnote.Range

aendnote.Reference.InsertBefore "a" & aendnote.Index & "a"

Next aendnote

For Each aendnote In ActiveDocument.Endnotes

aendnote.Reference.Delete

Next aendnote

Selection.Find.ClearFormatting

Selection.Find.Replacement.ClearFormatting

With Selection.Find.Replacement.Font

.Superscript = True

End With

With Selection.Find

.Text = "(a)([0-9]{1,})(a)"

.Replacement.Text = "\2"

.Forward = True

.Wrap = wdFindContinue

.Format = True

.MatchWildcards = True

End With

Selection.Find.Execute Replace:=wdReplaceAll

--
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

"Al" wrote in message
...
Hi, hope this is the right forum.

I have a 2 page document, created from a template, that contains an
EndNote.

If I do a MailMerge, and create a single record, the note appears at the
end of the document. However if I do a mailmerge to file, of say 21
records, the End notes do not appear at the end of page 2, but I get 21
instances at the end of the document.

Is this right, and can anyone advise me what i have done wrong?

Thanks
A