以下是设置Word VBA打印全部页面的代码:
```
Sub PrintAllPages()
ActiveDocument.PrintOut Range:=wdPrintAllDocument
End Sub
```
在这个例子中,我们使用了 `ActiveDocument.PrintOut` 方法来打印整个文档。参数 `Range` 被设置为 `wdPrintAllDocument`,表示打印所有页面。
你也可以将 `Range` 参数设置为其他值,以打印指定范围的页面。例如,如果你只想打印第1页到第3页,可以将 `Range` 参数设置为 `wdPrintFromTo`,并将 `From` 和 `To` 参数分别设置为 1 和 3。具体代码如下:
```
Sub PrintSomePages()
ActiveDocument.PrintOut Range:=wdPrintFromTo, From:=1, To:=3
End Sub
```
注意:在打印之前,请确保已经保存了文档,并且打印机已经连接并正常工作。