View Single Post
 
Old 03-24-2024, 04:05 PM
Guessed's Avatar
Guessed Guessed is offline Windows 10 Office 2016
Expert
 
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 3,995
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default

Have you tried the autoformatting function to apply styles in a single step? Then reset the font settings.
Code:
ActiveDocument.Range.AutoFormat
ActiveDocument.Range.Font.Reset
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote