Document.GrammarChecked (Word)

True, wenn für einen angegebenen Bereich oder ein Dokument eine Grammatikprüfung ausgeführt wurde.

Gibt false zurück, wenn alle oder ein Teil des angegebenen Dokuments nicht auf Grammatik überprüft wurde.

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