Quote:
Originally Posted by jjfreedman
Sorry, running the same code (or modifying the style through the Modify Style dialog) here does hide the numbers. Can you verify that the numbers in your document actually have the Footnote Reference style applied to them? That's the default behavior of the References > Insert Footnote button, but yours could have been inserted some other way.
|
Thanks! Just need to add this line and now it's working:
Code:
activedocument.Styles(wdStyleFootnoteReference).Font.Hidden=false
activedocument.ActiveWindow.View.ShowHiddenText=False
Now I'm looking for a way to get rid of the blank space (chr(32)) before the footnote text.
This is not working (it's removing entire footnote):
Code:
ActiveDocument.Footnotes(1).Reference.Text = Replace(ActiveDocument.Footnotes(1).Reference.Text, Chr(32), "")
Thanks!