Word文檔打印沒有找到

Question

Dim WA As Object, WD As Object 
    Set WA = CreateObject("Word.Application") 

Set WD = WA.Documents.Add(Filename) 
    With WD 
     .PrintOut Copies:=1, _ 
      Collate:=True, IgnorePrintAreas:=False, Preview:=False 
    End With 
WD.Close False 
WA.Quit False 
Set WD = Nothing 
Set WA = Nothing 

我得到錯誤 「未找到命名參數」，只能

.PrintOut副本：= 1

但它告訴我通過點擊「工具」--->「參考...」，然後單擊「Microsoft Word 15.0對象庫」旁邊的複選框，在我的項目中引用一個參考文件

。精選

沒有this parameters正在工作 那麼如何打印出我需要的所有參數？

Answer 1

單詞的Printout方法沒有IgnorePrintAreas或Preview參數。這裏有可用參數列表：https://msdn.microsoft.com/en-us/library/office/ff837331.aspx?f=255&MSPPError=-2147217396

您可以使用壓制保證金警告：

WA.Displayalerts = 0 
WD.PrintOut Copies:=1, Collate:=True 
WA.Displayalerts = -1