Hi,
I am trying to use the following code to spell check the contents of an MS Access 2000 textbox:
Dim X As Object
Set X = CreateObject("Word.Application"
X.Visible = False
X.Documents.Add
X.Selection.Text = Text1.Text
X.ActiveDocument.CheckSpelling
Text1.Text = X.Selection.Text
X.ActiveDocument.Close False
X.Quit
Set X = Nothing
This works fine unless the spell checker finds an incorrectly spelt word and the user hits the Cancel button on the resulting dialog box. If this happens what is pasted back into the textbox appears to be nothing but a series of carriage returns.
Can anyone suggest what I need to do in order to fix this?
Cheers,
Ed Metcalfe.
Please do not feed the trolls.....
I am trying to use the following code to spell check the contents of an MS Access 2000 textbox:
Dim X As Object
Set X = CreateObject("Word.Application"
X.Visible = False
X.Documents.Add
X.Selection.Text = Text1.Text
X.ActiveDocument.CheckSpelling
Text1.Text = X.Selection.Text
X.ActiveDocument.Close False
X.Quit
Set X = Nothing
This works fine unless the spell checker finds an incorrectly spelt word and the user hits the Cancel button on the resulting dialog box. If this happens what is pasted back into the textbox appears to be nothing but a series of carriage returns.
Can anyone suggest what I need to do in order to fix this?
Cheers,
Ed Metcalfe.
Please do not feed the trolls.....