AutoFormatApplyHeadings Property
True if styles are automatically applied to headings when Word formats a document or range automatically. Read/write Boolean.
Example
This example applies the Heading 1 through Heading 9 styles to headings in the current selection.
Options.AutoFormatApplyHeadings = True
Selection.Range.AutoFormatThis example returns the status of the Headings option on the AutoFormat tab in the AutoCorrect dialog box (Tools menu).
Dim blnAutoFormat as Boolean
blnAutoFormat = Options.AutoFormatApplyHeadings