2013-07-23 69 views
1

我試圖從Word打印到PDF,但每次都選擇不同的頁面範圍。從Word打印到PDF中的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正確創建,只是整個文檔。

我已經搜索了PrintOut方法參數的高低。

+1

這有幫助嗎? http://msdn.microsoft.com/en-us/library/office/bb237242%28v=office.12%29.aspx – jac

回答

2

參數可以在這裏找到 - http://msdn.microsoft.com/en-us/library/office/bb237242%28v=office.12%29.aspx(就像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)

+0

感謝您的網頁。當我搜索時,他們是我能找到的唯一的人。 –