I used the code below effectively to check spelling in a specific control. How do I check grammar. Need this urgently
Private Sub ReviewComment_LostFocus()
Rem If the textbox contains data run the
Rem Spell Checker after data is entered.
DoCmd.SetWarnings False
With Me!ReviewComment
.SetFocus
.SelStart = 0
.SelLength = Nz(Len(Me.ReviewComment), 0)
If Nz(Len(Me!ReviewComment), 0) > 0 Then Me!ReviewComment.SetFocus: DoCmd.RunCommand acCmdSpelling
End With
DoCmd.SetWarnings True
End Sub
Private Sub ReviewComment_LostFocus()
Rem If the textbox contains data run the
Rem Spell Checker after data is entered.
DoCmd.SetWarnings False
With Me!ReviewComment
.SetFocus
.SelStart = 0
.SelLength = Nz(Len(Me.ReviewComment), 0)
If Nz(Len(Me!ReviewComment), 0) > 0 Then Me!ReviewComment.SetFocus: DoCmd.RunCommand acCmdSpelling
End With
DoCmd.SetWarnings True
End Sub