endnote numbering

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Mikey - 25 Jun 2004 18:41 GMT

Ok, here's the deal. I have large document with over 200
endnotes. I originally composed in in WordPerfect and
then translated it into word. Since translating it, I
have rearranged text, and added endnotes. Now the
endnotes do not run sequentially. In fact, if I place
the cursor immediately after endnote 87, for example, and
click insert endnote, the number it gives is totally
different (52) -- I can see no rational way the program
comes up with this number. Endnotes are sequential 100-
147 and then continue to 87. Nevertheless, the endnote
appears in the proper sequence in the bottom (endnote)
frame, just with the wrong number. I have checked
the "track changes" feature, and this is not the problem,
and also I've deleted all section markers and directed
the program to number throughout the document. I'm at a
loss. Would appreciate any help...

Reply to this Message

Doug Robbins - Word MVP - 26 Jun 2004 10:33 GMT

Here's a macro that I developed for someone who had a somewhat similar
problem with footnotes. You could modify it to do the same thing with
endnotes

' Macro created by Doug Robbins to re-insert Footnotes
Dim afnRange As Range, afntext As String, i As Integer
For i = 1 To ActiveDocument.Footnotes.Count
ActiveDocument.Footnotes(i).Reference.Select
Selection.Characters(1).Select
If Not Selection.Style = "Footnote Reference" Then
While Not Selection.Style = "Footnote Reference"
Selection.Collapse wdCollapseStart
Selection.MoveLeft wdCharacter
Selection.Characters(1).Select
Wend
Selection.Delete
End If
Set afnRange = ActiveDocument.Footnotes(i).Range
afntext = afnRange.Text
ActiveDocument.Footnotes(i).Delete
ActiveDocument.Footnotes.Add Range:=Selection.Range, Text:=afntext
Next i

Signature

Please post any further questions or followup to the newsgroups for the
benefit of others who may be interested. Unsolicited questions forwarded
directly to me will only be answered on a paid consulting basis.

Hope this helps
Doug Robbins - Word MVP

> Ok, here's the deal. I have large document with over 200
> endnotes. I originally composed in in WordPerfect and
[quoted text clipped - 12 lines]
> the program to number throughout the document. I'm at a
> loss. Would appreciate any help...

Reply to this Message