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

Forumthread: Laufzeitfehler 5174 - Öffnen von Worddokumente

Laufzeitfehler 5174 - Öffnen von Worddokumente
12.02.2005 11:31:18
Worddokumente
Hallo,
ich hänge an einen (wenn nicht soagar den) "dummen" Laufzeitfehler 5174.
Wer kennt sich damit aus und kann helfen?
Danke im Voraus.
Gruß Volker
# Was möchte ich machen:
- ich möchte Worddocs öffnen, bearbeiten und schießen
- verwendete Wordversion Word 2003, SP1
# Scipt, wo es hackt:
Versuch 1:
Documents.Open FileName:=Dateiname & ".doc" ~f~
RESULTAT: mal läuft es, mal nicht! -&gt Fehlermeldung: Laufzeitfehler 5174 - Datei kann nicht gefunden werden, obwohl sie im Verzeichnis steht
Versuch 2 (Vorschlag hatte ich aus diesem Forum):
~f~
Dim WordApp As Object
Dim myDoc As Object
Set WordApp = CreateObject("Word.Application")
Set myDoc = WordApp.Documents.Open(ThisWorkbook.Path & "\Interview_6.doc")
RESULTAT: hier erscheint die Felhermeldung: Laufzeitfehler 424 - Objekt erforderlich
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Laufzeitfehler 5174 - Öffnen von Worddokumente
Worddokumente
Hallo
probiers mal so
Set myDoc = WordApp.Application.Documents.Open ThisWorkbook.Path & "\Interview_6.doc"
Deine EXCEL Datei muss natürlich gespeichert sein
Gruss Rainer
AW: Laufzeitfehler 5174 - Öffnen von Worddokumente
12.02.2005 13:50:32
Worddokumente
HI Rainer,
gerade mal probiert ... ne!
Set myDoc = WordApp.Application.Documents.Open(ThisWorkbook.Path & "\Interview_6.doc")
1. musste das Argument von VBA aus in Klammer setzen; und
2. trotzdem meckert das System: Laufzeitfehler 424: Objekt erforderlich
Noch eine Idee? Wäre klasse!
Anzeige
AW: Laufzeitfehler 5174 - Öffnen von Worddokumente
Worddokumente
Hallo
tut mir leid, ich kann den Fehler nicht reproduzieren.
Ich verwende genau die gleiche Syntax in meinen eigenen Makros ohne Probleme.
Word ist aber schon installiert :-) ?
Was gibt dir denn

Sub Test()
Msgbox thisWorkbook.Path
End Sub

aus, wenn du das aus deiner EXCEL-Datei ausführst ?
Gruss Rainer
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Laufzeitfehler 5174 beim Öffnen von Word-Dokumenten beheben


Schritt-für-Schritt-Anleitung

Um den Laufzeitfehler 5174 beim Öffnen von Word-Dokumenten aus Excel zu beheben, folge diesen Schritten:

  1. Word-Anwendung erstellen: Stelle sicher, dass du die Word-Anwendung korrekt instanziierst.

    Dim WordApp As Object
    Set WordApp = CreateObject("Word.Application")
  2. Dokument öffnen: Verwende die korrekte Syntax, um das Dokument zu öffnen. Achte darauf, dass der Dateiname korrekt ist und das Dokument im richtigen Verzeichnis liegt.

    Dim myDoc As Object
    Set myDoc = WordApp.Documents.Open(ThisWorkbook.Path & "\Interview_6.doc")
  3. Fehlerüberprüfung: Wenn der Laufzeitfehler 5174 weiterhin auftritt, überprüfe den Dateipfad und den Dateinamen. Führe den folgenden Code aus, um den Pfad zu überprüfen:

    Sub Test()
       Msgbox ThisWorkbook.Path
    End Sub
  4. Word sichtbar machen: Möglicherweise hilft es, die Word-Anwendung sichtbar zu machen, um eventuelle Dialoge zu sehen.

    WordApp.Visible = True

Häufige Fehler und Lösungen

  • Fehler: Laufzeitfehler 5174 - Datei kann nicht gefunden werden: Überprüfe den Dateipfad. Stelle sicher, dass das Dokument im angegebenen Verzeichnis vorhanden ist und der Dateiname korrekt ist.

  • Fehler: Laufzeitfehler 424 - Objekt erforderlich: Dieser Fehler tritt häufig auf, wenn die Word-Anwendung nicht korrekt instanziiert wurde. Stelle sicher, dass der Code zur Erstellung von WordApp vor dem Öffnen des Dokuments ausgeführt wird.


Alternative Methoden

Wenn die oben genannten Methoden nicht funktionieren, kannst du auch folgende Alternativen ausprobieren:

  1. VBA-Referenz hinzufügen: Füge eine Referenz zu “Microsoft Word xx.x Object Library” in den VBA-Referenzen hinzu. Dies kann die Interaktion mit Word erleichtern.

  2. Datei direkt über Word öffnen: Manchmal kann das direkte Öffnen des Dokuments über Word helfen:

    Shell "C:\Program Files\Microsoft Office\Office\WINWORD.EXE " & ThisWorkbook.Path & "\Interview_6.doc", vbNormalFocus

Praktische Beispiele

Hier sind einige praktische Beispiele, die dir helfen können:

  1. Öffnen eines Dokuments mit Fehlerüberprüfung:

    On Error Resume Next
    Set myDoc = WordApp.Documents.Open(ThisWorkbook.Path & "\Interview_6.doc")
    If Err.Number <> 0 Then
       MsgBox "Fehler beim Öffnen des Dokuments: " & Err.Description
    End If
    On Error GoTo 0
  2. Dokument speichern und schließen:

    myDoc.Save
    myDoc.Close
    WordApp.Quit

Tipps für Profis

  • Verwende With-Anweisungen: Diese können den Code kürzer und lesbarer machen.

    With WordApp
       .Visible = True
       Set myDoc = .Documents.Open(ThisWorkbook.Path & "\Interview_6.doc")
    End With
  • Debugging: Nutze die Debugging-Tools in VBA, um den Code Schritt für Schritt zu überprüfen und Fehler zu identifizieren.


FAQ: Häufige Fragen

1. Was ist Laufzeitfehler 5174?
Der Laufzeitfehler 5174 tritt auf, wenn ein Word-Dokument nicht gefunden werden kann. Dies kann an einem falschen Dateipfad oder Dateinamen liegen.

2. Wie kann ich sicherstellen, dass die Datei existiert?
Du kannst den folgenden Code verwenden, um zu überprüfen, ob die Datei vorhanden ist:

If Dir(ThisWorkbook.Path & "\Interview_6.doc") = "" Then
    MsgBox "Die Datei existiert nicht."
End If

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