Need Macro to UnBold TOC

A

Al

My TOC is bold and I want it unbold.
All my Headings are Character Bold (from another application) so I changed
all Heading Styles to be NOT bold so they remain bold.
But the TOC stays bold independent of the style definition of bold or not
bold.
I can manually select the TOC an unbold it but would like a macro to select
TOC an unbold it.
Thanks
 
J

Jonathan West

Al said:
My TOC is bold and I want it unbold.
All my Headings are Character Bold (from another application) so I changed
all Heading Styles to be NOT bold so they remain bold.
But the TOC stays bold independent of the style definition of bold or not
bold.
I can manually select the TOC an unbold it but would like a macro to
select
TOC an unbold it.
Thanks

Sub UnBoldToc()
ActiveDocument.TablesOfContents(1).Range.Font.Bold = False
End Sub
 
Top