

If > 1 ThenĪctiveDocument.Styles(wdStyleEndnoteReference).Font.Hidden = TrueĪctiveDocument.Styles(wdStyleEndnoteReference).Font.Hidden = False Rng.Collapse WdCollapseDirection.wdCollapseEnd StrSavedPage = CStr(en.Reference.Information(wdActiveEndPageNumber)) If CStr(en.Reference.Information(wdActiveEndPageNumber)) strSavedPage Then ' this version also formats the endnotes under page headings If you dont like the way your Word endnote numbers look, change them Mary Ann Richardson explains that you can change the reference marks. To adjust the settings of your footnote, including the numbering style, when to start and stop the numbering of your notes, etc., click on the Expand icon in the Footnotes Group of the References Ribbon. I can't re-research it right away but some possibilities might be to replace every endnote mark by a bullet (as suggested by the OP) or perhaps even something as simple as a space or a "-".įor example, something like this (which also hides the references using a different technique). Change automatic reference marks for Word endnotes. On the References Ribbon, in the Footnotes Group, click either the Insert Footnote or Insert Endnote icon. However, the OP thought the approach could be modified in a useful way so I have undeleted. Click the Return to Word Processor toolbar icon and select the place in the document where the references should be inserted. Allows editing of EndNote references from within Word (such as hiding the author name or adding page numbers. Select references for your list using the mouse and holding down the Ctrl key while multiple references are selected. Youre correct that list numbering has nothing to do with footnote/endnote numbering. That will change all the existing endnotes to numbers. In the dialog, change the Number Format dropdown as shown and click the Apply button. Unfortunately, a further look suggests that it would be difficult, if not impossible, to hide the endnote references (in the endnotes themselves) without hiding the paragraph marker at the end of the first endnote para, which means that all the endnotes will end up looking like a single messy note. There will be a field for the page number(. On the References tab of the ribbon, click the little arrow in the bottom right corner of the Footnotes group. rng, WdFieldType.wdFieldEmpty, "PAGEREF " & bookmarkText & en.Index & " \h", Falseįor a second run, you'd need to remove and re-insert the text and fields you had added. Rng.Collapse WdCollapseDirection.wdCollapseStart

Sub modifyEndNotes()Įn. bookmarkText & en.Index An alternative might be to use PAGEREF fields and hide the endnote references, e.g.
