Acrobat Reader File programmatisch speichern

Question

Ich brauche bitte Hilfe mit Windows-Nachrichten. Der folgende Code, der von Excel VBA aus mit einer mit Acrobat Reader DC geöffneten PDF-Datei ausgeführt wird, ruft den ersten Bildschirm "Speichern unter" hervor. Aber dieser Bildschirm hat nur Tasten ohne Handler, und ich kann nicht mit dem klassischen "Speichern unter" -Bildschirm fortfahren, um meinen Code zu beenden. Ich habe den Spy ++ 64 versucht und nichts hilfreiches gefunden. Der Spy 7 friert sowohl Excel als auch Acrobat Reader ein und Spy 32 läuft nicht auf meinem PC. Weiß irgendein Körper, welche Nachrichten ich verwenden kann, um dies zu erreichen? Vielen Dank im Voraus.

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 

Answer 1

Gelöst, endlich!

Dieser Bildschirm war der Cloud-Dienst von Acrobat Reader DC zum Speichern von Dateien. Ich folgte diesen Anweisungen unten und es hat den Trick:

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

Jetzt kann ich den Code verwende ich die klassische „Speichern unter“ aus Acrobat Reader DC aufzurufen geschrieben.