Since your endnotes don't actually have any content, there is nothing to cut.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Thank you. I'd been fiddling around with it on a test text, and noticed that indeed the notes have to contain text for it to work. (For my slightly odd purposes, I don't need actual text in the endnotes, but that's no problem. I can add dummy text and as soon as it's unliked it's easy enough to delete.)


In another version of Word it also balked at these lines:
.Style = "Endnote Text"
.Words.First.Style = "Endnote Reference"

Presumably this is because I have no "Endnote text" style defined in Word, or is that supposed to be a default style that's always there?

In any case, when I cut these two lines the macro did seem to work just fine. (For my purposes at least. I hope it is not doing something wrong that I haven't noticed yet. :-)

I used the above script, but some of the text deletion happened in the output.


Input:

EX: Some Text 1

<Heading>
Endnote Chapter 1
1 Endnote Text

The output showed like below:

Heading>
Endnote Chapter 1
1 Endnote Text

Can you please let me know how to retain the deleted text "<".

Sample Doc file attached. Please check and let me know.

Thanks in advance,
Bhaskar

Attached Files

Check.docx (16.0 KB, 11 views)