Good morning all,

I have had a mail merge macro working on Word 2000 for about two months
without any issues.  Then about 2 weeks ago several users reported some
problems with error messages.  I copied the templates back onto their
machines and the problem went away.

However, yesterday another much larger problem arose.  On all machines (mine
included), we began receiving Error 5852 Requested Object Not Available.  
This is a different message that we were receiving before.

I don't know if this had anything to do with it, but yesterday I was home
sick and made a directory path change on my home system which is running
Office 2003.  Saved the changes then uploaded them to the office where they
were copied to everyones computers.  It was after this we started to see the
Error 5852.

Here is the macro I am running.  It is embedded in a template that is used
to merge data from a comma delimited file dumped to their system from a DOS
based program.  A VB file launches Word with the template which then performs
the mail merge.

Private Sub Document_New()

   With ActiveDocument.MailMerge
       .SuppressBlankLines = True
       .Destination = wdSendToNewDocument
       .MailAsAttachment = False
       .MailAddressFieldName = ""
       .MailSubject = ""
       .SuppressBlankLines = True
       With .DataSource
           .FirstRecord = wdDefaultFirstRecord
           .LastRecord = wdDefaultLastRecord
       End With
       .Execute Pause:=True
   End With

   Application.Run macroname:="SettingBookmark"
   Application.Run macroname:="OSDFileSaveAsRTF"

End Sub

The two macros called in this one are behaving perfectly.  I have done some
searching on the Internet and can't find a good solution so I am hoping
someone here can help.

Thanks in advance.

Gilley