GCG,
AFAIK you can only get close. Here is a macro that will show spelling
errors in red font with a red wavy underline. The stetted out section
"will" show grammatical errors in green font with a green wavy
underline. The problem I encountered is that a sentence with a
mispelled word is considered a grammatical error and so the green
trumps the red. An otherwise well written sentence with a single
mispelled word is all painted green :-(. Unstet the lines and you will
see what I mean:
Sub TagSpellingSPerrors()
Dim oSPerror
Dim SPerrors
Dim oGRerror
Dim GRerrors
Set SPerrors = ActiveDocument.SpellingErrors
Set GRerrors = ActiveDocument.GrammaticalErrors
For Each oSPerror In SPerrors
With oSPerror.Font
..Color = wdColorRed
..Underline = True
..Underline = wdUnderlineWavy
End With
Next oSPerror
'For Each oGRerror In GRerrors
' With oGRerror.Font
' .Color = wdColorGreen
' .Underline = True
' .Underline = wdUnderlineWavy
' End With
' End If
'Next oGRerror
End Sub
