Hi,
I wrote this code which when runned just expplode my access.
(MSACCESS as generated error and will be closed by Windows...)
I use Office 2000.
Could some one try it and tell me if he got the same problem.
Dim appWord As Word.Application
Dim docTemp As Word.Document
Dim rngManip As Word.Range
Set appWord = New Word.Application
appWord.Visible = True
Set docTemp = appWord.Documents.Open("AnyWordFile")
Set rngManip = appWord.ActiveDocument.Range
rngManip.Find.Text = "1" 'KAAABOOOOM
rngManip.Find.Execute
rngManip.Select
Enter your message below
Sign in or Join us (it's free).