#1
|
|||
|
|||
Adding footnote number as part of footnote text
I have a large document with many footnotes that will be undergoing some updates. The author's desire is to keep the original footnote reference number in front of the footnote text (also as text, not footnote reference style) so you can see what the original number was even after new footnotes are added that change the numbering.
I would like to insert the word Note with the number in curly brackets between the footnote reference number and the footnote text. Example: 1 {Note 1} footnote 1 text 2 {Note 2} footnote 2 text I have a macro that loops through the footnotes and adds additional text, but incorporating a variable number as part of that text is beyond me. Any help is appreciated – thanks! |
#2
|
||||
|
||||
Do you want the number to be static text or a seq field so that it always matches the footnote number?
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia |
#3
|
|||
|
|||
Perhaps something like this:
Code:
Option Explicit Private m_oFN As Footnote Sub ScratchMacro() For Each m_oFN In ActiveDocument.Footnotes m_oFN.Range.Text = "(Note - " & fcnGetFootnoteReferenceIndex & ") " & m_oFN.Range.Text Next lbl_Exit: Exit Sub End Sub Function fcnGetFootnoteReferenceIndex() As String With m_oFN With .Reference.Characters.First .Collapse .InsertCrossReference wdRefTypeFootnote, wdFootnoteNumberFormatted, m_oFN.Index fcnGetFootnoteReferenceIndex = .Characters.First.Fields(1).Result .Characters.Last.Fields(1).Delete End With End With lbl_Exit: Exit Function End Function |
#4
|
|||
|
|||
Thanks, Greg - that does the trick!
|
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Space between footnote number and footnote text | Sabya | Word | 6 | 07-29-2018 02:30 PM |
No space between footnote number and footnote | cgp1689 | Word | 6 | 10-13-2015 08:24 AM |
Extracting certain text before footnote number | Taisir | Word VBA | 6 | 11-26-2014 12:27 AM |
VBA code to read number of footnote and enter in text | rekent | Word VBA | 2 | 05-13-2014 06:53 AM |
Footnote text is not aligned with the corresponding number | Patrick1988 | Word | 0 | 08-28-2010 09:33 PM |