struct WordProxy
{
  IDispatch *getInstance() = 0;
};

ssm>struct WordProxy
ssm>{
ssm>  IDispatch *getInstance() = 0;
ssm>};
ssm>

_Application objWord;

      // Convenient values declared as ColeVariants.
      COleVariant covTrue((short)TRUE),
                  covFalse((short)FALSE),
                  covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

      // Get the IDispatch pointer and attach it to the objWord object.
      if (!objWord.CreateDispatch("Word.Application"))
      {
         AfxMessageBox("Couldn't get Word object.");
         return;
      }

      objWord.SetVisible(FALSE);

Dim WithEvents ExcelApp As Excel.Application
Const workbookname As String = "c:\tmp\x.xls"

Private Sub ExcelApp_WorkbookBeforeClose(ByVal Wb As Excel.Workbook, Cancel As Boolean)
  Dim wb2 As Excel.Workbook
  If ExcelApp.Visible Then
    If UCase(Wb.FullName) = UCase(workbookname) Then
      Cancel = True
      ExcelApp.Visible = False
     
      '  Закрываем все остальные документы
      For Each wb2 In ExcelApp.Workbooks
        If Not wb2 Is Wb Then wb2.Close
      Next

    End If
  End If
End Sub

Private Sub Form_Load()
  Set ExcelApp = CreateObject("Excel.application")
  ExcelApp.Workbooks.Open workbookname
End Sub

Private Sub Form_Unload(Cancel As Integer)
  Dim ea2 As Excel.Application, wb2 As Excel.Workbook
 
  Set ea2 = ExcelApp
  Set ExcelApp = Nothing
 
  If ea2.Workbooks.Count = 1 Then
    '  Закрываем приложение
    ea2.Visible = False
    ea2.Quit
  Else
    '  Закрываем только свой документ
    For Each wb2 In ea2.Workbooks
      If UCase(wb2.FullName) = UCase(workbookname) Then
        wb2.Close
        Exit For
      End If
    Next
  End If
End Sub

1. создаешь Excel (Word) (смотри Form_Load),
   
2. в нем открываешь свой документ (он не отображается и не будет отображаться для визуального пользователя) (смотри Form_Load),
   
3. подключаешься к его событиям, отслеживая открытие/закрытие документов в твоем экземпляре Excel (Word) и не давая серверу закрыть твой документ (смотри Form_Load и ExcelApp_WorkbookBeforeClose),
   
4. при завершении клиента корректно уничтожаешь твой экземпляр Excel (Word) (смотри Form_Unload).

1. создаешь первый экземпляр Excel (Word) — для открываемых пользователем документов, — который контролируешь и не даешь ему завершиться,
   
2. создаешь второй экземпляр Excel (Word) — для своего приложения.

который контролируешь и не даешь ему завершиться