VB6에서 Word에서 PDF로 인쇄

Word에서 PDF로 인쇄하려고하지만 매번 다른 페이지 범위를 선택하려고합니다.VB6에서 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가 올바르게 작성되고 전체 문서 만 생성됩니다.

PrintOut 메소드 매개 변수의 최고 값과 최저 값을 검색했습니다.

출처

2013-07-23 John Moore

이 방법이 도움이됩니까? http://msdn.microsoft.com/en-us/library/office/bb237242%28v=office.12%29.aspx – jac

매개 변수는 여기에서 찾을 수 있습니다 - 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 대신 Application이었습니다)

출처

2013-07-24 09:22:04 Vadim

페이지를 제공해 주셔서 감사합니다. 그들은 내가 찾을 때 찾을 수있는 유일한 사람들이었습니다. –

VB6에서 Word에서 PDF로 인쇄

답변

관련 문제