[RESOLVED] Spell checker needed

[Guru]

I need a function which takes a word and returns true if it is spelt correctly and false if it isn't.

Seems simple enough but all the M$ Word based samples I've seen prompt to correct.

The must be this functionality deep within Word somewhere because of the way it auto highlights incorrect spellings....



Thanks

[nateobot]

http://www.vbforums.com/showthread.php?t=246451

[brucevde]

The CheckSpelling function of MS Word will spellcheck single words as well as the entire document. When you pass it a word it simply returns True or False, no correction or prompts are given.

Dim oWord As Word.Application
    Dim blnSpell As Boolean
    
    Set oWord = New Word.Application
    blnSpell = oWord.CheckSpelling("Teest")
    If Not blnSpell Then
         msgbox "'Teest' is not spelled correctly."
    End If
    oWord.Quit False
    Set oWord = Nothing

[Guru]

Thanks brucevde!

That's just what I needed.