Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 10:28:49
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Abfrage, aus welchem Modul aufgerufen wurde

Abfrage, aus welchem Modul aufgerufen wurde
25.11.2008 15:46:00
Michael
Hallo zusammen,
ich habe mal wieder ein Problem.
Ich schreibe in ein Klassenmodul eine allgemeingültige Funktion. Zur Bearbeitung dieser muss ich nun wissen, von welchem Modul die Funktion aufgerufen wurde. Application.Caller liefert einen Fehler zurück, wahrscheinlich ist die Verwendung nur bei Aufrufen von Objekten heraus möglich.
Gibt es eine ähnlich Eigenschaft, die ich abfragen kann?!
"CallingModule.Name" beispielsweise?
Im Beispiel möchte ich als Ergebnis "TEST" erhalten:

Public Sub TEST()
Dim A As Variant
A = FunktionXYZ
End Sub


Vielen Dank für Eure Hilfe!
Gruß
Micha

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Abfrage, aus welchem Modul aufgerufen wurde
25.11.2008 15:51:00
Heinz
Hi,
unklar, was die Funktion leisten soll, außer den namen des Moduls zu liefern.
Übergib den Modulnamen als Variable.
mfg Heinz
AW: Abfrage, aus welchem Modul aufgerufen wurde
25.11.2008 15:57:17
Michael
Hallo Heinz,
gibt es keine andere Möglichkeit?
Was die Funktion macht ist unwichtig. Entscheidend ist, dass ich wissen muss, von wo aus sie aufgerufen wurde ohne weitere Variablen übergeben zu müssen. Ist natürlich eine Möglichkeit, aber mir wäre eine andere lieber, wenn es sie denn gibt.
Gruß
Micha
Anzeige
AW: Abfrage, aus welchem Modul aufgerufen wurde
25.11.2008 16:00:00
Heinz
Hi,
"...Was die Funktion macht ist unwichtig..."
Ist es nicht zum Verständnis, wozu du wissen willst, aus welchem Modul
heraus der Aufruf erfolgte.
mfg Heinz
AW: Abfrage, aus welchem Modul aufgerufen wurde
26.11.2008 10:03:00
Michael
Hallo,
in der Funktion muss ich zum Beispiel ein Worksheet setzen, dessen Namen den Namen der aufrufenden Funktion enthält. Alles andere noch zu erklären, wäre sehr aufwendig. ;)
Also:
Set xlSheet(i) = xlWkb.Worksheets(strIrgendwas & " " & strCallingModuleName)
Gruß
Micha
Anzeige
;

Forumthreads zu verwandten Themen

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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