DECLARE INTEGER FindWindow IN user32 STRING lpClassName, STRING lpWindowName  
  DECLARE INTEGER SetWindowPos IN user32 INTEGER hwnd, INTEGER hWndInsertAfter, ;  
      INTEGER x, INTEGER y, INTEGER cx, INTEGER cy, INTEGER wFlags  
  oWord = CreateObject("Word.Application")  
  nHwnd = FindWindow(.Null., oWord.Caption)  
  oWord.WindowState = 1  
  oWord.Visible = .T.  
  = SetWindowPos(nHwnd, -1, 0, 0, 0, 0, 11)