Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: integrierte PDF-Datei per VBA öffnen

integrierte PDF-Datei per VBA öffnen
22.01.2015 09:22:46
Peet
Halli Hallo,
habe folgendes Problem:
Ich habe in ein Tabellenblatt meiner Excel-Mappe ein Objekt (PDF-Datei) eingefügt und diese "Anleitung" genannt.
Nun würde ich gerne per VBA-Makro gezielt die PDF-Datei öffnen.
Habt ihr einen Tipp, mit welchem Befehl ich das machen könnte?
Ich wäre euch sehr dankbar!
Gruß Peet

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: integrierte PDF-Datei per VBA öffnen
22.01.2015 09:57:27
Nepumuk
Hallo Peet,
einfach so:
Public Sub Test()
Tabelle1.OLEObjects(1).Verb Verb:=xlPrimary
End Sub

Den Objektnamen der Tabelle und den Index des OLEObjektes musst du gegebenenfalls anpassen.
Gruß
Nepumuk

AW: integrierte PDF-Datei per VBA öffnen
22.01.2015 10:00:25
fcs
Hallo Peet,
Sub Anleitung_Oeffnen_1()
'Eingebettes PDF-Objekt öffnen
Dim objShape As Shape
Set objShape = Worksheets("Tabelle1").Shapes("Anleitung")
objShape.OLEFormat.Verb
End Sub

Gruß
Franz

Anzeige
AW: integrierte PDF-Datei per VBA öffnen
22.01.2015 10:09:01
Peet
Top, funktioniert!
Vielen lieben Dank! :)
;

Forumthreads zu verwandten Themen

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Integrierte PDF-Datei per VBA öffnen


Schritt-für-Schritt-Anleitung

Um eine integrierte PDF-Datei in Excel per VBA zu öffnen, folge diesen Schritten:

  1. Öffne Excel und lade die Arbeitsmappe, in der sich die PDF-Datei befindet.

  2. Füge ein neues Modul hinzu:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
    • Klicke im Menü auf Einfügen > Modul.
  3. Kopiere und füge den folgenden Code in das Modul ein:

    Public Sub PDF_Oeffnen()
       Tabelle1.OLEObjects(1).Verb Verb:=xlPrimary
    End Sub

    Stelle sicher, dass du den Objektnamen und den Index entsprechend anpasst, falls nötig.

  4. Starte das Makro:

    • Schließe den VBA-Editor und kehre zu Excel zurück.
    • Drücke ALT + F8, wähle PDF_Oeffnen und klicke auf Ausführen.

Häufige Fehler und Lösungen

  • Fehler: "Objekt nicht gefunden"
    Wenn du den Fehler erhältst, stelle sicher, dass der Name des OLE-Objekts (z.B. "Anleitung") korrekt ist und dass es sich im richtigen Arbeitsblatt befindet.

  • Lösung: Falscher Index
    Überprüfe, ob du den richtigen Index für das OLE-Objekt verwendest. Die Indizes beginnen bei 1.


Alternative Methoden

Wenn du eine alternative Methode ausprobieren möchtest, kannst du die folgende Variante verwenden:

Sub Anleitung_Oeffnen_1()
    ' Eingebettes PDF-Objekt öffnen
    Dim objShape As Shape
    Set objShape = Worksheets("Tabelle1").Shapes("Anleitung")
    objShape.OLEFormat.Verb
End Sub

Diese Methode nutzt die Shapes-Eigenschaft, um das PDF-Objekt gezielt anzusprechen.


Praktische Beispiele

Ein Beispiel für die Verwendung des Codes könnte folgendermaßen aussehen:

Sub PDF_Oeffnen()
    ' Öffne das erste PDF-Objekt in Tabelle1
    Tabelle1.OLEObjects(1).Verb Verb:=xlPrimary
End Sub

Hier wird das erste OLE-Objekt auf Tabelle1 geöffnet. Wenn du mehrere PDF-Dateien hast, kannst du den Index entsprechend anpassen.


Tipps für Profis

  • Verwende die OLEObjects-Sammlung, um gezielt auf verschiedene Objekte zuzugreifen.
  • Dokumentiere deinen Code, um den Überblick zu behalten, besonders wenn du mehrere PDF-Dateien in einer Arbeitsmappe verwaltest.
  • Teste den Code regelmäßig, um sicherzustellen, dass alles ordnungsgemäß funktioniert, insbesondere wenn Änderungen an der Arbeitsmappe vorgenommen werden.

FAQ: Häufige Fragen

1. Wie kann ich mehrere PDF-Dateien in einer Mappe öffnen?
Du kannst mehrere Makros erstellen, die jeweils auf unterschiedliche OLE-Objekte zugreifen. Achte darauf, die Indizes entsprechend anzupassen.

2. Funktioniert das auch in älteren Excel-Versionen?
Ja, die beschriebenen Methoden funktionieren in den meisten modernen Excel-Versionen, allerdings könnten bestimmte Funktionen in älteren Versionen nicht verfügbar sein. Achte darauf, deine Excel-Version zu überprüfen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige