![]() |
|
|
|
#1
|
||||
|
||||
|
Instead of adding manual formatting, change the style
Code:
Sub Zchangefootnote()
With ActiveDocument.Styles("Footnote Text").Font
.Size = 10
.Name = "Times New Roman"
End With
End Sub
__________________
Graham Mayor - MS MVP (Word) (2002-2019) Visit my web site for more programming tips and ready made processes www.gmayor.com |
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| VBA - change font and font size for Word footnote | thomasoj | Word VBA | 1 | 01-15-2020 02:37 AM |
Merging two Word documents: 2nd document not maintaining original font type and font size
|
Swarup | Word | 31 | 08-28-2018 06:55 PM |
| Opening doc in Word 2010 causes normal template to change - font size incorrect | Simonb | Word | 4 | 01-26-2016 03:52 PM |
Looping Macro to Change Font, Font Size, and Give Heading 1
|
WH7262 | Word VBA | 1 | 08-26-2014 03:46 PM |
| Word will not hold settings, such as font and size of font | Mary M | Word | 1 | 10-12-2013 07:41 AM |