在VB6中从Word打印到PDF

在VB6中从Word打印到PDF,pdf,vb6,ms-word,Pdf,Vb6,Ms Word,我正在尝试从Word打印到PDF,但每次都选择不同的页面范围 Dim objWord As Word.Application Set objWord = New Word.Application objWord.Visible = True objWord.Documents.Open "s:\reports\EY\FileName.doc", , , True objWord.ActiveDocument.PrintOut , , , "s:\test.pdf", , , , 1, "1-2"

我正在尝试从Word打印到PDF,但每次都选择不同的页面范围

Dim objWord As Word.Application
Set objWord = New Word.Application
objWord.Visible = True
objWord.Documents.Open "s:\reports\EY\FileName.doc", , , True
objWord.ActiveDocument.PrintOut , , , "s:\test.pdf", , , , 1, "1-2"
我的默认打印机是我的PDF创建者

文档打开良好,PDF已创建,但无法读取

去掉页面范围,PDF被正确创建,只是整个文档

 objWord.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:=wdPrintDocumentWithMarkup, Copies:=1, Pages:="3-5", PageType:=            wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False,            PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0,            PrintZoomPaperHeight:=0

我在上下搜索了
打印输出的方法参数。

可以在这里找到参数(就像jac在评论中说的那样)

无论如何,这里有一个代码,可以将当前文档的第3-5页打印到默认打印机。有些值可能是无用的,可能会被删除,但这是Word在录制宏和打印文档时生成的

 objWord.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:=wdPrintDocumentWithMarkup, Copies:=1, Pages:="3-5", PageType:=            wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False,            PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0,            PrintZoomPaperHeight:=0
请注意带有标记的wdPrintRangeOfPages和wdPrintDocumentWithMarkup,这可能是缺少的内容


(在宏中是应用程序而不是objWord)

这有帮助吗?谢谢你的页面。他们是我搜索时唯一能找到的人。