AutoFormatAsYouTypeDefineStyles Property
True if Word automatically creates new styles based on manual formatting. Read/write Boolean.
Example
This example sets Word to automatically create styles as you type.
Options.AutoFormatAsYouTypeDefineStyles = True
This example returns the status of the Define styles based on your formatting option on the AutoFormat As You Type tab in the AutoCorrect dialog box (Tools menu).
Dim blnAutoFormat as Boolean
blnAutoFormat = Options.AutoFormatAsYouTypeDefineStyles