|
Hallo VBA Cracks,
in eine Listbox lese ich Dateien aus einem Ordner ein und öffne diese mit einem Doppelklick.
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim Ordner
Dim Datei
Dim Adoc As Document
Datei = ListBox1.Value
Ordner = "F:\persönliche Ordner\Berichte\" 'Pfad zu den Berichten
Documents.Open Ordner & Datei
End Sub
Klappt auch alles wunderbar.
Nur: Scheitert das öffnen dennoch, bekomme ich die Fehlermeldung: "Laufzeitfehler 4198: Befehl misslungen", und es geht in den Debugger.
Z.B. wenn von Windows das Kontrollfenster "Datei konvertieren" kommt und ich auf Abbrechen klicke.
Das ist natürlich nicht sehr schön. Kann ich diese Fehlermeldung also irgendwie umgehen? Weiß einer Rat?
Vielen lieben Dank im Voraus.
|