I'm trying to open a new document and bring up the File
Save As dialog to save it.  I'm having problems reliably
activating the new document instead of the original
document I'm starting from.  This is the code I'm using
right now (mostly gleaned from the Microsoft MVP site):

   Dim docMyName As String
   docMyName = "My Name"

   Documents.Add DocumentType:=wdNewBlankDocument
   Windows(1).Activate
   
   With Dialogs(wdDialogFileSaveAs)
       .Name = docMyName
       .Show
   End With

I am running MS Word 2002 on Windows 2000.
J.J. Kayande