2014-01-10 140 views
0

當前Sub CurrentpageP()僅打印文檔的第一頁。Word VBA打印整個文檔

找不到打印整個文檔的方法。我已將頁面參數更改爲以下,但沒有運氣「1-9999」和「1-2」。

Link here長碼 - 下面是該段的片段。

Sub CurrentpageP() 
With ActiveDocument.PageSetup 
    .FirstPageTray = 281 
    .OtherPagesTray = 281 
End With 
Application.PrintOut FileName:="", Range:=wdPrintCurrentPage, Item:= _ 
    wdPrintDocumentContent, Copies:=1, pages:="", PageType:=wdPrintAllPages, _ 
    Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _ 
    PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0 

End Sub 

回答