Loop through Footnote Reference Marks

Ramses505 · #1 05-11-2019, 10:07 AM

I have some code that loops through the actual Footnotes that looks like this;

Code:

Sub Test_Format_Footnote()
Dim f As Footnote

For Each f In ActiveDocument.Footnotes
  With f.Range.Characters(1)
    If .Text = vbTab Or .Text = " " Then 'Use any other sensible detection logic here
      .Text = vbTab
    Else
      .InsertBefore "Look Here !"
    End If
  End With
Next
End Sub

How do I loop through the Footnote Reference Marks; the numbers in the text linking to the actual footnote ?

I would like to change the format of them on several ways - I would also like to know how to just loop through them for future reference.

Thanks

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Removing line break and indentation between footnote number and footnote text in Word	jaanross	Word	5	02-06-2020 12:04 AM
Footnote reference numbers precede by superscript '(' and follow w/ superscript ')'	Swarup	Word	4	07-18-2019 05:51 PM
How do I fix this unknown problem? Right-angle marks in corners - crop marks	Quillo1234	Word	2	07-20-2016 02:24 AM
How to keep the footnote(endnote) reference numbers when pasting text between two documents?	gn4619	Word	4	10-22-2015 08:01 AM
Get footnote reference	GLENCOE	Word VBA	1	04-07-2015 04:08 AM