ClickAndTypeParagraphStyle Property Example
This example sets the default paragraph style applied by Click and Type to Plain Text.
With ActiveDocument
x = "Plain Text"
If .Styles(x).InUse Then
.ClickAndTypeParagraphStyle = x
Else
MsgBox "Sorry, this style is not in use yet."
End If
End With