I've updated the line, but i now get a
Private Sub cmdSave_Click()
If Nz(Me.Comments, "") = "" Then
MsgBox "You have not entered a comment", vbCritical, "Nothing to save"
Me.Comments.SetFocus
Exit Sub
Else
Call SpellChecker(Me.Comments)
End If
' append new comment to...