Skip to content

Instantly share code, notes, and snippets.

@idarek

idarek/spellcheck_ms_access

Created January 21, 2021 11:52
Show Gist options
  • Save idarek/2844a27a03daeadbf4072ddbf0774584 to your computer and use it in GitHub Desktop.
Save idarek/2844a27a03daeadbf4072ddbf0774584 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
spellcheck_ms_access
Private Sub FieldName_LostFocus()
If Not IsNull(FieldName) Then
With FieldName
.SetFocus
.SelStart = 0
.SelLength = Len(FieldName)
End With
DoCmd.SetWarnings False
RunCommand acCmdSpelling
DoCmd.SetWarnings True
End If
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment