Document.GrammarChecked Property (Word)
True if a grammar check has been run on the specified range or document. Read/write Boolean.
This example determines whether grammar has been checked in the active document. If it has, the word count is displayed. If grammar has not 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.