Spell Checker

[BCullenward]

Does anyone have any examples of a spell checker? I found one that opens a word doc and copies the text into that, but it does not do what I need it to do. The built in spellchecker ignores Upper case values, and breaks after 3-4 tabs/subforms

 

[tkpstock]

So you are looking for a spell-checker that is more robust than Word's spell-checker? Or would Word's suffice if it caught UPPERCASE.

And, how does it "break" after three to four tabs/subforms? That part was pretty vague...

 

[Bat17]

The built in one ignores Uppercase by default but you can change it in
Tools>Spelling>Options...

Peter

 

[tkpstock]

This is the correct code... setting the IgnoreUppercase option must occur before populating the document.

Sub TryIt()
    Dim oWd As New Word.Application
    Dim oDoc As Word.Document
    Set oDoc = oWd.Documents.Add
    oDoc.Paragraphs.Add
    oWd.Application.Options.IgnoreUppercase = False
    oDoc.Content.InsertAfter Text:="This is my text for the document.  This is a misspeltt word.  This is ALSOO mispelt."
    Dim oSe
    Set oSe = oDoc.SpellingErrors
    Dim i As Integer
    For i = 1 To oSe.Count
        MsgBox oSe(i)
    Next i
    Set oSe = Nothing
    Set oDoc = Nothing
    oWd.Quit savechanges:=False
    Set oWd = Nothing
End Sub