spell checker

  • Thread starter Thread starter Sam
  • Start date Start date
S

Sam

I have a form whose recordsource is a pass through from SQL. The spell check
icon is disabled. Is there any way to get Access to allow a spell check? I
have other code that will save edits but can't get spell check working.

Thank you
Sam
 
Try putting this in a module. Do not name it the same as the function, and
call the code from a command button:

Public Function Spell()
' Arvin Meyer 9/17/1998
' Adapted from code by Terry Wickenden
Dim ctlSpell As Control
Dim frm As Form
Set frm = Screen.ActiveForm
DoCmd.SetWarnings False
' Enumerate Controls collection.
For Each ctlSpell In frm.Controls
If TypeOf ctlSpell Is TextBox Then
If Len(ctlSpell) > 0 Then
With ctlSpell
.SetFocus
.SelStart = 0
.SelLength = Len(ctlSpell)
End With
DoCmd.RunCommand acCmdSpelling
End If
End If
Next
DoCmd.SetWarnings True
End Function

If it doesn't work, you may have to reinstall Office.
 
Back
Top