I am fairly new to access and in particular VBA. So I've been working on setting up a spell checker for a specific memo field in a form using a button. Here is the code
Private Sub Spellcheck_click()
With Me!Description
If Len(.value) >0 Then
DoCmd.SetWarnings False
.SetFocus
.Selstart = 1
.SelLength = Len(.Value)
DoCmd. RunCommand acCmdSpelling
. SelLength = 0
DoCmd.SetWarnings True
End If
End With
End Sub
I am looking at spelling checking two other field titled Comment (memo) and Title (textbox). When I switch the With Me!Description to With Me!Comment I receive a 438 Error. I've also tried to add a second with me statement using the "comment" or "title" instead of "description" but it doesn't work. This is frustrating!
Please help
Private Sub Spellcheck_click()
With Me!Description
If Len(.value) >0 Then
DoCmd.SetWarnings False
.SetFocus
.Selstart = 1
.SelLength = Len(.Value)
DoCmd. RunCommand acCmdSpelling
. SelLength = 0
DoCmd.SetWarnings True
End If
End With
End Sub
I am looking at spelling checking two other field titled Comment (memo) and Title (textbox). When I switch the With Me!Description to With Me!Comment I receive a 438 Error. I've also tried to add a second with me statement using the "comment" or "title" instead of "description" but it doesn't work. This is frustrating!
Please help
