VBA PRINT TO PDF

ragnarokx

以下我写了一些CODE来print screen IE,然后SEND PRINT去PDF.
TRIGGER PRINT  的那一PART我的MACRO过到，但是到了SAVE AS 的部分就卡住了。
应该怎么写呢
Sub PrintGoogle()
     Dim objIE As Object
Set objIE = CreateObject("InternetExplorer.Application")
     objIE.Visible = True
objIE.navigate "http://www.Google.com/"
Call IEWait(objIE)
Call WaitFor(3)
objIE.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER, 1

yan13

你的default printer 是PDF printer?
看看這個有用嗎
http://www.neevia.com/support/ex ... cnet&exNumber=7

ragnarokx

Ah Yan 谢谢你

我将pdf printer set as default printer
、这个PRINTER DIALOG过到但是SAVE的DIALOG就不可以，不要紧我回家再试

yan13

ragnarokx 发表于 10-11-2014 11:16 PM
Ah Yan 谢谢你

我将pdf printer set as default printer

我沒精力去coding只能大概講講我的看法....好孩子不要學
不太了解你的意思,但你用什麼都好,send 去 pdf printer, 他應該也是save as dialog.
感覺parameter不對,起碼要有一個Filename parameter.