Office: (Office 2010) Laufzeitfehler 91 trotz On Error Goto Sprungmarke

Ersetze mal Application.VBE.ActiveCodePane.CodeModule.Parent.NAME durch einen normalen String z. B. "xyz" und probier es nochmal.

Ich hab den Eindruck, dass Application.VBE.ActiveCodePane.CodeModule.Parent.NAME während des Programmablaufes noch nicht von VBA eingerichtet ist, und daher tritt der Fehler 91 auf. Sobald der Debugmodus aktiviert wird, ist es dann jedoch vorhanden und deshalb läuft der Programmcode normal weiter. Im Internet sind dazu einige Beiträge zu finden.

Freundliche Grüße
readonly

 

Hallo!

VBE.ActiveCodePane wird nothing sein, sobald im VBA-Editor kein Codemodul angezeigt wird.
Warum sollte das überhaupt den Namen des Moduls zurückliefern, in dem der Fehler auftritt?

mfg
Josef

 

Application.VBE.ActiveCodePane.CodeModule.Parent.NAME liefert im Formular den Namen des Formulars, ansonsten vermutlich den Namen des Moduls, da es ja kein Parent gibt, was natürlich völlig verfehlt ist, weil man nicht weiß in welcher Prozedur der Fehler passiert ist, geschweige denn in welcher Anweisung.

me.Name würde das selbe tun.
Kompliziert ist manchmal einfach schöner.

 

\@Markus: das macht es aber nur, wenn das Codemodul des Formulars zufällig geöffnet und aktiviert ist.
Das Parent-Objekt vom Codemodul ist ein VBIDE.VBComponent.

mfg
Josef

 

Stimmt, es liefert immer das oberste geöffnete Module.
Ich verwende aktiveModul immer um im aktiven Modul code per VBA aus dem Direktbereich heraus zu erzeugen.

Wieder was gelernt.

LG Markus

 

Werde das direkt testen und den Code Application.VBE.ActiveCodePane.CodeModule.Parent.NAME entfernen und einfach manuell einen String eintragen.

 

Das wars! Vielen vielen Dank für die Unterstützung an alle.
Da wäre ich allein niemals drauf gekommen.