从 excel vba 的 word 文件中打印特定页面

Question

I'm trying to print specific pages from a word file using Excel VBA, but I couldn't do that, I was only able to print the whole file and not the pages I wanted (changes according the value of LastPage).我正在尝试使用 Excel VBA 从 word 文件中打印特定页面，但我做不到，我只能打印整个文件，而不是我想要的页面（根据 LastPage 的值进行更改）。 This is the code I used.这是我使用的代码。 Please help with that, thanks.请帮忙，谢谢。

Sub PrintFile()
Dim objWord As Object
Dim objDoc  As Object

Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open("D:file.docx")
objWord.Visible = False
objDoc.PrintOut from:="1", To:="LastPage".value
objWord.Quit
End Sub

Answer 1

Assuming you are getting an error on the line starting objDoc.PrintOut then replace that line with假设您在开始objDoc.PrintOut的行上遇到错误，然后将该行替换为

objDoc.PrintOut Range:=wdPrintFromTo, From:="1", To:=CStr(LastPage)

从 excel vba 的 word 文件中打印特定页面

问题描述

1 个解决方案

解决方案1
0 已采纳 2022-09-04 08:30:16

从 excel vba 的 word 文件中打印特定页面

问题描述

1 个解决方案

解决方案1 0 已采纳 2022-09-04 08:30:16

解决方案1
0 已采纳 2022-09-04 08:30:16