CreateObject("Scripting.FileSystemObject"): Laufzeitfehler '432': Datei- oder Klassenname während Automatisierungsoperation nicht gefunden

Question

Hallo,

ich habe ein VBA Makro, das seit Jahren funktioniert. seit einigen Tagen habe ich es aber nicht gestartet und plötzlich kommt bei meiner Funktion in der Zeile mit "Set fs" der Fehler "Laufzeitfehler '432': Datei- oder Klassenname während Automatisierungsoperation nicht gefunden". Hier das Makro:

Sub ProtokollSchreiben(text As String)

    Const ForWriting = 2, ForAppending = 8

    Dim protokolldatei

    Dim fs, f

    Set fs = CreateObject("Scripting.FileSystemObject")

    protokolldatei = ActiveWorkbook.Sheets(kat).Cells(7, 8).Value

    Set f = fs.OpenTextFile(protokolldatei, ForAppending, True)

    f.Write text & Chr(13) & Chr(10)

    f.Close

End Sub

die Datei scrrun.dll ist vorhanden und ich hab sie auch schon mit regsvr32 noch mal registriert.

ich bin jetzt schon ziemlich am Verzweifeln, da ich das Makro dringend brauche.

Was kann es da bitte haben?

Danke für Eure Hilfe!

EaterJoe

Answer 1

Entschuldigung war der falsche Beitrag.

http://www.ms-office-forum.net/forum/showthread.php?t=305322

Answer 2

Danke, und ich zweifelte schon an mir, weil ich denn Zusammenhang nicht sah!

:-)

Lg

Answer 3

ich verstehe weder, was die von Ihnen verlinkte Frage mit meiner zu tun hat, noch was eine fehlende Rückmeldung von einem Albert hier zu suchen hat.

eventuell gehört das ja zusammen, dann erklären Sie mir das bitte.

Herzlichen Dank!

EaterJoe

Answer 4

man kann auch eine Rückmeldung geben, wenn das Problem gelöst ist.

http://www.herber.de/forum/messages/1342581.html

Gruß Hajo