title: Add specific Document to specific Word.Application
body: <p>May I assign the <code>objDoc</code> as a document of the <code>ObjWord</code> (after <code>Set objDoc = oDoc.Object</code>)?</p>
  
  <p>My code looks like this:</p>
  
  <pre><code>'Declaration
  Dim oDoc As OLEObject
  Dim objWord As Word.Application
  Dim objDoc As Word.Document
  
  Dim WS as Worksheet
  Dim strOdoc as String
  
  'Initialization
  Set WS = Whorksheets("Sheet1")
  strOdoc = "WordDoc"
  
  Set objWord = New Word.Application
  
  'Set objWord = GetObject(, "Word.Application")
  'I need using GetObject to be able to made the activated OLEDocument, invisible.
  'And Need Set objWord = New Word.Application to be able
  'to EndTask the WINWORD.EXE with objWord.Quit.
  
  objWord.Visible = False
  Set oDoc = WS.OLEObjects(strOdoc)
  oDoc.Activate
  Set objDoc = oDoc.Object
  'I need here Add the objDoc to the objWord
  </code></pre>
  
  <hr>
  
  <ul>
  <li>I need <code>objDoc</code> to have been a document of the <code>objWord</code> object, which has been hidden with <code>objWord.Visible = False</code> (<strong>I can't use <code>Dim objDoc As objWord.Document</code> variable declaration</strong>).</li>
  <li>I need the <code>objWord</code> to have been isolated because when using
  <code>objWord.Quit</code>, it must not try to close other Word Documents. (Here I used <code>Set objWord = New Word.Application</code>)</li>
  <li>I need using the <code>GetObject</code> statement to be able to made the activated OLEDocument <strong>invisible</strong>.</li>
  <li>And Need Set <code>objWord = New Word.Application</code> to be able to EndTask the
  WINWORD.EXE with <code>objWord.Quit</code>.</li>
  <li><blockquote>
    <p>But how can integrate two above advantages: <strong>1) Working Invisible with the OLEObjectDocument and 2) Perform EndTask the WINWORD.EXE if no other word documents are opened</strong>?</p>
  </blockquote></li>
  </ul>