I would like to print out a document with the wavy lines showing all spelling
and grammatical errors. Does anyone know if there is a way?

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