|
|
|||||||
|
|
Thread Tools | Display Modes |
|
#10
07-12-2022, 05:44 PM
|
||||
|
||||
Since I have no idea what your 'main overhaul macro' is, I can't comment on that. Regardless, what you want is as simple as:
Code:
Sub ReFormatFtNts()
Application.ScreenUpdating = False
Dim FtNt As Footnote
With ActiveDocument.Range
For Each FtNt In .Footnotes
With FtNt.Range
.Font.Reset
.InsertBefore "[["
.InsertAfter "]]"
End With
Next
End With
Application.ScreenUpdating = False
End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] 
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| VBA Insert Image(logo) into header for multiple Word Docs | Axis | Word VBA | 4 | 02-09-2022 10:34 PM |
 Changing footer image in Multiple word documents
|
killabyte | Word VBA | 2 | 09-23-2020 05:49 AM |
| How to place an image placeholder that scales the image to the full frame size in a template | Cube | Word | 5 | 07-05-2020 08:27 AM |
|
Adding Title Image to Multiple Documents.
|
Agog | Word VBA | 4 | 05-03-2018 05:30 AM |
|
Replace footer image in multiple Word documents
|
heyjim | Drawing and Graphics | 1 | 08-07-2015 05:23 PM |
Windows 10 
Office 2016
Threaded Mode