![]() |
#1
|
|||
|
|||
![]()
I wonder if the code below is the fastest method to format footnote reference marks. Thanks!
Code:
For Each NumRif In ActiveDocument.Footnotes NrPres = NrPres + 1 Set myRange = ActiveDocument.Footnotes(NrPres).Reference myRange.Style = ActiveDocument.Styles("MyStyle") myRange.Font.Color = wdColorBlue Next NumRif NumRif = 0 NrPres = 0 |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
Change superscripts to regular text except footnote marks without using 'Selection.' | RobiNew | Word VBA | 7 | 10-01-2023 01:55 AM |
![]() |
Ramses505 | Word VBA | 6 | 09-21-2023 12:10 AM |
![]() |
TheBigBoss | Word VBA | 5 | 06-10-2022 06:14 AM |
![]() |
wmac | Word | 1 | 05-14-2013 08:54 PM |
![]() |
b0x4it | Word VBA | 4 | 05-18-2011 07:54 PM |