以編程方式保存Acrobat Reader文件

我需要一些關於windows消息的幫助。下面的代碼從Excel VBA執行，任何使用Acrobat Reader DC打開的PDF文件都會喚起第一個「另存爲」屏幕。但是這個屏幕只有沒有處理程序的按鈕，我不能進入經典的「另存爲」屏幕來完成我的代碼。我試過了Spy ++ 64，沒有找到有用的東西。 Spy 7凍結Excel和Acrobat Reader，Spy 32沒有運行在我的電腦中。任何機構都知道我可以用來完成這些任務的消息嗎？在此先感謝。以編程方式保存Acrobat Reader文件

Declare PtrSafe Function PostMessage Lib "USER32.dll" Alias "PostMessageA" (ByVal handler As Long, ByVal mssge As Long, ByVal hword As Long, lword As Any) As Long 

Declare PtrSafe Function FindWindow Lib "User32" Alias "FindWindowA"(ByVal lpClassName As Any, ByVal lpWindowName As Any) As Long 

Sub evoke_saveas() 
    a = FindWindow("AcrobatSDIWindow", vbNullString) 
    PostMessage a, &H100, 1, 0 
    PostMessage a, &H6, 1, 0 
    PostMessage a, &H111, &H1776, 0 
end sub

來源

2016-10-16 Matheus

終於解決了！

該屏幕是Acrobat Reader DC用於保存文件的雲服務。我跟着這些指令的下方，它的伎倆：

https://forums.adobe.com/thread/1815625

現在我可以用我張貼調用經典的「另存爲」從Acrobat Reader軟件DC的代碼。

來源

2016-10-21 13:44:27 Matheus

以編程方式保存Acrobat Reader文件

回答

相關問題