Eingebettete pdf-Datei öffnen
29.01.2024 09:11:08
Stefan
ich möchte gerne eine eingebettete PDF-Datei die in der Mappe "Daten" liegt, mittels Knopfdruck aus Mappe "2024" öffnen und direkt anzeigen lassen.
Ich habe aktuell folgenden Code/Makro:
Sub Test12()
Sheets("Daten").Select
Sheets("Daten").Shapes.Range("Object 3").Select
Sheets("Daten").OLEObjects("Object 3").Verb Verb:=xlOpen
Sheets("2024").Select
End SubDer Code funktioniert soweit auch - leider wird mir bpsw. nach schließen und öffnen der Excel-Datei, die PDF-Datei minimiert und nicht direkt auf dem Bildschirm angezeigt.
Auch muss der Knopf teilweise 2-3x gedrückt werden bis die PDF-Datei minimiert geöffnet wird. Öffne ich zuerst den VBA-Editor in Excel und schließe diesen (ohne jegeliche Veränderungen am Code etc. durchgeführt zu haben) und drücke danach den Knopf aus Mappe "2024" öffnet sich die PDF-Datei direkt auf den Bildschirm.
Hat jemand eine Idee was ich falsch gemacht habe?
Danke für eure Hilfe und Gruß,
Stefan
Anzeige