GrammarChecked Property Example

This example determines whether grammar has been checked in the active document. If it has, the word count is displayed. If grammar hasn't been checked, a spelling and grammar check is started.

Set myStat = ActiveDocument.ReadabilityStatistics
passGram = ActiveDocument.GrammarChecked
If passGram = True Then
    Msgbox myStat(1).Name & " - " & myStat(1).Value
Else
    ActiveDocument.CheckGrammar
End If

This example sets the GrammarChecked property to False for the active document, and then it runs a grammar check again.

ActiveDocument.GrammarChecked = False
ActiveDocument.CheckGrammar