Office: (Office 2013) Alle VBA Ereignisprozeduren werden mit Laufzeitfehler 2501 abgewiesen

Das Problem tritt seit zwei Tagen auf meinem Desktop PC unter Windows 10 Home 64 Bit letzter Servicestand und mit Office Professional Plus 2013 auf. Diese Kombination werkelt nun seit einiger Zeit - mind. 3 Jahre - erfolgreich ohne Probleme bis vorgestern, als ohne ersichtlichen Grund der Laufzeitfehler 2501 bei jedem Aufruf einer Ereignisprozedur auftauchte. Recherche im Netz ergab nichts Brauchbares, Kontrolle des Trustcenters ebenso nichts. Tracemessages in den VBA Proceduren zeigen, dass nur die Messagebox durchgeführt wird.
Beispiel:

Private Sub btnDaten_Click()
On Error GoTo ErrClick
DoCmd.OpenForm "frmDaten", , , , , acWindowNormal
DoCmd.Close acForm, "frmMenu"
ExitClick:
Exit Sub
ErrClick:
MsgBox Err.Number & " frmMenu OnClick vor OpenForm"
GoTo ExitClick
End Sub

Leider hat auch eine Neuinstallation von Office nicht geholfen. Die einzige Officeaktivität vor diesem Fehler war das Aktivieren von Outlook. Das ich nun brauche da Incredimail den Service einstellt. Und das "Reparieren" der Officeinstallation, als Versuch der Problemlösung, weil Outlook trotz permanenter Netzverbindung Mails nicht versendete ...
Ich wäre dankbar für eine Lösung meines Access Problems.
Herzlichen Dank im Voraus!
Ernst

:)

 

Hallo Ernst,

du solltest die Zeile ermitteln, wo der Fehler auftritt. Dazu vorübergehend mal die Anweisung "On Error ..." auskommentieren und schauen, ob beim Open oder beim Close der Fehler ausgelöst wird.

Da wüsste man mehr.

Ulrich

 

Tut mir leid, ich dachte es wäre klar, dass der unter On Error liegende Command nicht relevant ist, da alle Aufrufe jeder Ereignisprozedur mit einem Fehler beendet werden. Wie auch immer - die obige Prozedur wird über eine Schaltfläche in frmMenu aufgerufen, soll frmDaten öffnen und frmMenu beenden. Das Resultat zeigt Anhang AccErr1.jpg. Wenn man frmDaten direkt öffnet, dann bekommt man den Fehler in AccErr2.jpg, weil dieses Formular eine Prozedur On Open aufruft. Entfernt man die Open Prozedur erhält man den Fehler in AccErr3.jpg, weil das Formular beim Beenden wieder frmMenu aufrufen will ...
Also kein Aufruf einer Ereignisprozedur funktioniert!

 

Hallo Ernst,

dann würde ich mir mal die Formulare genauer ansehen. Was wird denn in im Formular_Open() der Formulare gemacht, daß das zu einem Fehler führt? Einfach nur die Prozedure entfernen ist ja keine Lösung für das Problem.

Ulrich

 

Vielen Dank für die Antwort, Ulrich!
Doch glaube ich, dass ich da mit der Herumprobiererei für Outlook in ein viel grundsätzlicheres Problem gerannt bin. Vor allem deswegen, weil bis vorgestern das alles klaglos funktioniert hat und danach an der DB keine Änderungen mehr vorgenommen wurden. Das beschriebene Problem tritt auch an DBs auf, die ich - bis auf Dateneingabe - seit Wochen nicht mehr angerührt habe.
Das On Open von frmDaten ist ein simples SetFocus ...

Private Sub Form_Open(Cancel As Integer)
Me!suchKasette.SetFocus
End Sub

Ich seh' schon eine komplette Neuinstallation von Win10 und hunderten Apps auf mich zu kommen. Nur gut, dass man wegen Corona ohnehin nicht aus dem Haus kann ...*mad.gif* *mad.gif* *mad.gif*
Mit vielen Grüßen!
Ernst

 

Hallo Ernst,

vielleicht liegt das Problem beim Update von Windows 10?

 

Na ja, Maxel, nach 55 Jahren in der IT und bis zur Pensionierung im OS/390 System Support, habe ich auch daran gedacht, konnte aber keinen Windows System Patch finden, der das Verhalten erklären könnte. Ich weiß aber, dass ich sehr viel herumprobiert habe, weil einige Mails im Outlook mit verstümmelten drei Zeichen Umlauten angekommen sind. Dafür habe ich in den Windows Regionseinstellungen einen Beta UTF-8 Support gefunden, der wohl die Umlaute im Outlook gelöst, aber zu sehr vielen Problemen mit der Umlautdarstellung in anderen Programmen geführt hat. Ich habe das Häkchen vom Beta UTF-8 Support wieder weggenommen, nur ist Windows nicht zum vorigen Verhalten zurückgekehrt. Ich sehe nun statt des kryptischen einen Zeichens, die drei Zeichenfolge, die jeder von uns kennt, wenn Umlaute nicht richtig übersetzt werden. Nur nicht die normalen Umlaute! Ich befürchte daher, dass ich etwas Irreversibles in meinen Windowseinstellungen angestellt habe, das auch das Verhalten von MS Access beeinflusst. Ich stelle auch in anderen Programmen teilweise ein sehr seltsames Verhalten fest. Wie z.B. eine Fehlermeldung nach einem Rechtsklick, die sagt dass ein Name nicht gefunden wurde. Der "Name" besteht aus drei wirren Zeichen. Klickt man diese Meldung weg, kommt ganz normal die Dropdownliste ...
Ich hatte gehofft, dass hier im Forum jemand dieses Verhalten von MS Access bereits kennt, leider scheint das nicht so zu sein. Jetzt schlafe ich eine Nacht darüber und wenn ich morgen nicht am Netz bin, dann wisst ihr warum ...
Mit vielen Grüßen!
Ernst

 

Dass es Verweisfehler gibt, hast Du bereits ausgeschlossen? Solche äußern sich zwar mehr dadurch, dass dann einfachste VBA-Funktionen selber nicht mehr funktionieren ... aber neuere Accessversionen haben ggf. höhere Funktionalität.

Eine normales Compilieren bzw. auch man ein Decompile hast Du probiert?

Wenn das VBA-Projekt beschädigt ist, hilft evtl. auch TM - RebuildDatabase.

 

Liebe Leute, vielen Dank für eure Ratschläge, aber das Problem liegt - wie ich nun weiß - weder an den Formularen, noch am verwendeten VBA Code. Sondern - aber das ist eine lange Geschichte ...
Die gute Nachricht ist - ich arbeite nun auf einem neuen, blitzenden und glitzernden Windows 10. Denn wie angekündigt, habe ich Windows auf eine frisch formatierte Platte installiert (wobei das Schwierigste war, meine Hardware davon zu überzeugen von einem USB Stick zu laden ...). Die schlechte Nachricht ist - der Fehler war auch am frisch aufgesetzten Windows unverändert vorhanden! Also habe ich eine neue Test DB angelegt, um herauszufinden, ob das Interface Office-VBA überhaupt funktioniert und siehe da in der Test DB gab es damit keine Probleme. Damit war der Weg klar. Aus den alten DBs (aus den unveränderten Formularen!!) den gesamtem VBA Code entfernen und dann jede einzelne Sub (mit unverändertem Inhalt!!) neu installieren. Das funktioniert. Mir ist dabei aufgefallen, dass das Einrichten einer Ereignisprozedur im Office 2015 anders aussieht als ich das von älteren Office Versionen kenne. Ich verstehe aber trotzdem nicht, warum Office 2015 mit den alten DBs ca. 2 Jahre lang fröhlich gearbeitet hat und dann vor ein paar Tagen beschließt den Dienst einzustellen ...
Es muss wohl doch ein Update gewesen sein, das das Interface Office-VBA beschädigt hat ...
Nochmals herzlichen Dank für eure Unterstützung!
Ernst