>Hi Barbara,
>
>I ended up using a combination of both your suggestions and Cetin's.
>
>

>  ThisForm.oWord = CreateObject("Word.Application")
>  WITH Thisform.oWord
>    oDoc = .Documents.Open(lcTemplate)
>    .ActiveDocument.SaveAs("Temp.doc")
>    WITH Thisform.oWord.ActiveDocument
>      FOR nField = 1 TO FCOUNT("tmpQuote")
>        IF .Bookmarks.Exists(FIELD(nField))
>        .FormFields(FIELD(nField)).Result = ALLTRIM(TRANSFORM(EVALUATE(FIELD(nField))))
>        ENDIF
>      ENDFOR
>    ENDWITH
>    .Visible = .T.
>    .WindowState = 0
>    WAIT WINDOW "Press any Key to Continue"
>  ENDWITH
>

>
>I added the wait wind to stop processing until the word object is closed.
>
>Sometimes I have several instances of WinWord running in the taskmanager. Is there a way to detect this?
>
>Thanks

You could do something like :

Declare integer GetForegroundWindow in WIN32API
Declare short IsWindow in WIN32API integer

*..
  .visible = .t.	&& Show word app
  .Activate
Endwith
lHwndWord = GetForegroundWindow()  && Save word window handle
do while IsWindow(lHwndWord)
enddo

Cetin