Grammar checker code doesn't perform like the menus

[Charlie Mac]

I am trying to make Word's Grammar Checker run from a button. The
problem is that this code will not "recheck" text that was previously
marked as "Ignore Once". Actually, it will revaluate some of the
text, which really baffles me. As an example if the document has
three sentences that begin with "But" and all three are marked as
"Ignore Once", this code will likely green-underline one or two of
them.

This code was simply recorded by clicking Tools, Options, Spelling &
Grammar, Check Document (or Recheck Document as it generates the same
code) and Yes.

Any ideas are appreciated. Thanks.

Sub Macro5()
Application.ResetIgnoreAll
ActiveDocument.SpellingChecked = False
ActiveDocument.GrammarChecked = False
With Options
.CheckSpellingAsYouType = True
.CheckGrammarAsYouType = True
.SuggestSpellingCorrections = True
.SuggestFromMainDictionaryOnly = False
.CheckGrammarWithSpelling = True
.ShowReadabilityStatistics = False
.IgnoreUppercase = True
.IgnoreMixedDigits = True
.IgnoreInternetAndFileAddresses = True
.AllowCombinedAuxiliaryForms = True
.EnableMisusedWordsDictionary = True
.AllowCompoundNounProcessing = True
.UseGermanSpellingReform = True
End With
ActiveDocument.ShowGrammaticalErrors = True
ActiveDocument.ShowSpellingErrors = True
Languages(wdEnglishUS).SpellingDictionaryType = wdSpelling
End Sub

 

[Word Heretic]

G'day Charlie Mac <>,

ActiveDocument.SpellingChecked=false

Steve Hudson - Word Heretic

steve from wordheretic.com (Email replies require payment)
Without prejudice

 

[Charlie Mac]

Steve,

I have that line in my code below to no avail. Thanks anyway for your
reply.

Take care,

Charlie

 

[Word Heretic]

G'day Charlie Mac <>,

My most humble apologies. 2/2 I didnt read properly because I am not
proeprly online yet.

ActiveDocument.GrammarChecked=False

Steve Hudson - Word Heretic

steve from wordheretic.com (Email replies require payment)
Without prejudice