VB - Word文書を非表示/表示= False

Question

文書を印刷してアプリケーションを非表示にする必要があります。私はMicrosoft Word 2010を使用しています。

以下のコードを黄色いコメントに入れてアプリケーションを隠そうとしました。

objWord.Visible = Falseの

&

objDoc.ActiveWindow.Visible = Falseの

が、ウィンドウはまだこのラインで表示されます。

objDoc = objWord.Documents.Open("T:\Helsingborg\A\Transport\2. Transportdrift\11. M-trp\Fraktsedlar\Växjö\Växjö Mall.doc") 

そして、次のようになるとすぐに隠されます：

objDoc.ActiveWindow.Visible = False 

文書が開かれる前に、私はActiveWindow.Visible = Falseを使用することはできませんので、私は本当に、この問題を解決する方法を見つけることができません。

これは私の現在のコードです。

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
    ' Step 1 
    Dim objWord 
    objWord = CreateObject("Word.Application") 
    ' Hidden window! 
    objWord.Visible = False 
    ' Save the original printer, otherwise you will reset the system default! 
    Dim previousPrinter 
    previousPrinter = objWord.ActivePrinter 
    objWord.ActivePrinter = "" 

    ' Step 2 
    Dim objDoc 
    objDoc = objWord.Documents.Open("T:\Helsingborg\A\....\Växjö Mall.doc") 
    objDoc.ActiveWindow.Visible = False 
    ' Step 3 -- in this case, print out the document without any prompts 
    objDoc.PrintOut 
    ' Restore the original printer 
    objWord.ActivePrinter = previousPrinter 

    ' Step 4 
    objDoc.Close 

    ' Step 5 
    objWord.Quit 

    MsgBox("Everything is now printed") ' Change to custom MSGBOX 

End Sub 

EDIT：別の方法として、Wordを開かずにドキュメントwordを印刷することができます。 Documents.Open文の代わりに

Answer 1

set objDoc = GetObject(Filename) 
set objWord = objDoc.Parent 

は

objDoc.Close False