endnote removal

Copper Contributor

I am unable to remove endnotes and have the numbering change in the text and endnotes accordingly. I also cannot access an endnote menu, as described elsewhere online.  Any suggestions on how to do this?

1 Reply

@Dr_Alan_Dattner To remove all of the endnotes, run a macro containing the following code

 

Dim i As Long
With ActiveDocument
    For i = .Endnotes.Count To 1 Step -1
        .Endnotes(i).Delete
    Next i
End With

 

To remove an individual endnote, select and delete the endnote reference in the body of the document.  That will cause the endnote text to be deleted and the numbering of any endnotes, that are located in the document after that one, will be adjusted accordingly.