【发布时间】:2014-01-10 22:53:45
【问题描述】:
目前 Sub CurrentpageP() 仅打印文档的第一页。
想不出办法让它打印整个文档。我已将页面参数更改为以下但没有运气“1-9999”和“1-2”。
Link here 用于长代码 - 下面是 sn -p of 部分。
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
【问题讨论】: