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

Forumthread: Externe Datei aus Excel heraus öffnen

Externe Datei aus Excel heraus öffnen
25.02.2005 11:16:23
Holger
Hallo,
ich habe in Excel ein VBA-Code hinterlegt, dieser soll bei anklicken auf verschiedene Materialnummern in den Exceltabellen die dazugehörige Pdf-Datei öffnen, in der technische Daten stehen.
Wie lautet der Programmcode in Visual Basic womit ich ein Externes Programm oder eine Externe Datei, z.B. eine Pdf - Datei öffnen kann? Nur öffnen, nicht in Excel importieren.
Vielen dank im vorraus
MfG
Holger Wächter
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Externe Datei aus Excel heraus öffnen
u_
Hallo,
schau dir mal die Shell-Funktion an.
Gruß
AW: Externe Datei aus Excel heraus öffnen
25.02.2005 11:31:48
Holger
Was meinst Du mit Shell Funktion! Sorry. So gut bin ich dann doch nicht in VBA. Wo finde ich die?
AW: Externe Datei aus Excel heraus öffnen
Jan
Hi Holger,
Manchmal reicht die VBA-Hilfe aus:
Shell Funktion (Beispiel)
In diesem Beispiel wird die Shell-Funktion verwendet, um eine vom Benutzer angegebene Anwendung zu starten. Auf dem MacIntosh ist der Standardlaufwerkname “HD”, und Bestandteile des Pfadnamens werden durch Doppelpunkte anstelle von umgekehrten Schrägstrichen getrennt. Auch würden Sie Macintosh-Ordner anstelle von \Windows angeben.
' 1 als zweites Argument startet die Anwendung in Normalgröße mit Fokus.
Dim Ergebnis
Ergebnis = Shell("C:\WINDOWS\CALC.EXE", 1) ' Rechner starten.
Jan
Anzeige
AW: Externe Datei aus Excel heraus öffnen
Holger
Danke, bin jetzt schon ein Schritt weiter, aber ich möchte ja kein Programm starten, sondern eine Pdf - Datei, oder halt den Acrobat Reader aber der soll sofort mit der entsprechenden Pdf Datei geöffnet werden.
AW: Externe Datei aus Excel heraus öffnen
25.02.2005 12:03:20
Dominic
Hallo Holger,
So sollte es gehen:
1. Erstelle eine Hyperlink zur datei mit: ActiveSheet.Hyperlinks.Add
2. Folge der Hyperlink: Hyperlinks(1).Follow
Gruß
Dominic
Anzeige
AW: Externe Datei aus Excel heraus öffnen
u_
Hallo,
wirkt bei Doppelklick in A. Pfad anpassen

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 1 Then
Dim strDateiName As String, MyShell As Object, StrPfad As String
StrPfad = "c:\Daten\pdf\" 'anpassen!
Set MyShell = CreateObject("WScript.Shell")
strDateiName = StrPfad & Target & ".pdf"
strDateiName = Chr(34) & strDateiName & Chr(34)
MyShell.Run strDateiName
Set MyShell = Nothing
Cancel = True
End If
End Sub

Anzeige
AW: Externe Datei aus Excel heraus öffnen
25.02.2005 12:09:36
Holger
Vielen Dank, das war das was ich wollte... Hat geklappt....
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Externe Datei aus Excel heraus öffnen


Schritt-für-Schritt-Anleitung

Um eine externe Datei, wie beispielsweise eine PDF-Datei, aus Excel heraus zu öffnen, kannst du den folgenden VBA-Code verwenden. Dieser öffnet die Datei, wenn du auf eine bestimmte Zelle doppelklickst.

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu starten.
  2. Wähle das Arbeitsblatt aus, in dem du den Code verwenden möchtest.
  3. Füge den folgenden Code in das Codefenster ein:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column = 1 Then
        Dim strDateiName As String, MyShell As Object, StrPfad As String
        StrPfad = "c:\Daten\pdf\" ' Pfad anpassen!
        Set MyShell = CreateObject("WScript.Shell")
        strDateiName = StrPfad & Target & ".pdf"
        strDateiName = Chr(34) & strDateiName & Chr(34)
        MyShell.Run strDateiName
        Set MyShell = Nothing
        Cancel = True
    End If
End Sub
  1. Passe den StrPfad an den Speicherort deiner PDF-Dateien an.
  2. Schließe den VBA-Editor und teste den Code, indem du auf die Zelle in Spalte A doppelklickst.

Häufige Fehler und Lösungen

  • Fehler: Datei wird nicht gefunden

    • Lösung: Stelle sicher, dass der Pfad zu den PDF-Dateien korrekt ist und die Datei den gleichen Namen wie die Materialnummer hat.
  • Fehler: VBA-Code wird nicht ausgeführt

    • Lösung: Überprüfe, ob Makros in Excel aktiviert sind. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen.

Alternative Methoden

Neben dem VBA-Code kannst du auch Hyperlinks verwenden, um eine externe Datei zu öffnen:

  1. Füge einen Hyperlink zu der PDF-Datei in Excel hinzu:
ActiveSheet.Hyperlinks.Add Anchor:=ActiveCell, Address:="c:\Daten\pdf\deine_datei.pdf"
  1. Um den Hyperlink zu folgen, kannst du den folgenden Code verwenden:
ActiveSheet.Hyperlinks(1).Follow

Diese Methode ist besonders nützlich, wenn du keine Programmierung verwenden möchtest.


Praktische Beispiele

Angenommen, du hast eine Liste von Materialnummern in Spalte A und die entsprechenden PDF-Dateien liegen im Ordner c:\Daten\pdf\. Mit dem oben genannten VBA-Code kannst du einfach auf die Materialnummer doppelklicken, und die passende PDF wird direkt geöffnet.


Tipps für Profis

  • Verwende Fehlerbehandlung: Füge Fehlerbehandlungsroutinen in deinen Code ein, um unerwartete Probleme zu vermeiden.

  • Dynamische Pfade: Wenn du oft den Speicherort der Dateien änderst, könntest du den Pfad in einer Zelle speichern und im Code darauf zugreifen. Dies macht deine Lösung flexibler.


FAQ: Häufige Fragen

1. Wie kann ich eine externe Datei mit Excel öffnen, ohne VBA zu verwenden?
Du kannst Hyperlinks verwenden, um eine Datei mit Excel zu öffnen, indem du sie direkt in die Zelle einfügst.

2. Welche Excel-Version benötige ich für diesen VBA-Code?
Der gezeigte VBA-Code funktioniert in allen modernen Versionen von Excel, einschließlich Excel 2013, 2016, 2019 und Microsoft 365.

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