Results 1 to 4 of 4
  1. #1
    Join Date
    Oct 2007
    Posts
    214

    Question Unanswered: Spellchecking a memo field in a form

    Hi Everyone,

    Perhaps you can help with this one. I have a memo field in my form in which my employees type notes etc. Well, they'd like to do a spellcheck via click of a button or automatically if even possible. Right now, they have to highlight the text and click spellcheck in the access tools menu.

    Is there any way to automate this process? If so, what would be the best way and coding to go about doing this?

    Thanks for all your help!

  2. #2
    Join Date
    Jun 2005
    Location
    Richmond, Virginia USA
    Posts
    2,763
    Provided Answers: 19

    Cool

    See if this does what you need. It limits the SpellChecker to the one field in the current record:
    Code:
       
      Private Sub YourTextFieldName_Exit(Cancel As Integer)
      With Me!YourTextFieldName
         
        If Len(.Value) > 0 Then
          DoCmd.SetWarnings False
          .SelStart = 1
          .SelLength = Len(.Value)
          DoCmd****nCommand acCmdSpelling
           .SelLength = 0
          DoCmd.SetWarnings True
        End If
       
      End With
       
    End Sub
    Do to a bug on this site you'll need to replace

    DoCmd****nCommand acCmdSpelling

    with

    DoCmd.R u nCommand acCmdSpelling

    just delete the spaces to make RunCommand one word.
    Linq :0)>
    Hope this helps!

    The problem with making anything foolproof...is that fools are so darn ingenious!

    All posts/responses based on Access 2003/2007

  3. #3
    Join Date
    Oct 2007
    Posts
    214
    HI there,

    Thanks for the reply. This seems to be it, but when the code runs it says it can't find the field me! separation_details (which is my memo field name)

    What could be the issue? Thanks!

    CODE _____

    With Me!Separation_Details

    If Len(.Value) > 0 Then
    DoCmd.SetWarnings False
    .SelStart = 1
    .SelLength = Len(.Value)
    DoCmd****nCommand acCmdSpelling

    .SelLength = 0
    DoCmd.SetWarnings True
    End If

    End With

  4. #4
    Join Date
    Oct 2007
    Posts
    214
    I got it. it's me.fieldname

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •