Office: Prüfen von welcher Funktion aus aufgerufen worden ist

Hallo liebe Forenmitglieder,

ich hätte eine Frage bezüglich der Aufrufe in Vba. Es geht mir um die Frage ob folgendes möglich ist:

Ich will in einer Funktion "A" Code ausführen lassen, abhängig davon,
von welcher Funktion diese Funktion "A" her ausgeführt worden ist.
D.h.:

Ich starte eine If-Abfrage die dann sagt: "Ok, meine Funktion in der ich mich befinde wurde von Funktion "B" (oder "C" oder "D" usw.) aufgerufen, also führe ich folgenden Code aus"

Auch wenn das hier alles doppelt gemoppelt ist, ich hoffe ich habe den Sachverhalt verständlich darstellen können^^

Evtl. ist das Thema ziemlich easy und ich steh auf dem Schlauch, aber ich hab grad keinen Plan wie ich das googeln soll - ich habs probiert aber iwi bin ich zu blöd für^^

Ich hoffe ihr lacht mich nicht aus, und könnt mir helfen *wink.gif*

Gruß
Michi

:)

 

Hallo,

meines Wissens kannst du in Excel nicht abfragen, von wo eine Funktion aufgerufen wurde.

Allerdings kannst du in deiner Funktion A einen Parameter anlegen und diesen bei Aufruf aus B oder C unterschiedlich füllen.
Ich stelle mir das folgendermaßen vor:
Code:

Hilft dir das weiter?

VG
Santa

 

Hallo Michi,

lass Deine Funktion mit einem Parameter aufrufen Code:

[EDIT] Oh je. Zu langsam.

 

Hallo Michi,

ich würde es genau so machen, wie von Santa beschrieben. Aber wenn du abhängig von der vorhergehenden Funktion unterschiedlichen Code ausführen willst, dann frage ich mich, warum du dann nicht gleich unterschiedliche Subs aufrufst?

 

Das stimmt.

Es geht konkret darum:

Ich habe Ca. 50 Kontrollkästchen. Wenn über diese Kontrollkästchen gefahren wird (Mouse over) dann soll ein Tool Tip angezeigt werden. Und ich wollte halt blos eine User Form haben, die je nachdem über welches kontrollkästchen gefahren wird mit unterschiedlichem Text befüllt wird

EDIT: ... und da wollte ich es vermeiden ca 50 Userforms zu erstellen..

 

Hallo,

an der Stelle des MouseOvers, wo du deine Userform einblendest, würde ich auch den Text der Userform ändern.
Nicht erst in einer Funktion der Userform selbst, wenn diese eingeblendet wird.

VG
Santa

 

Oh mann. Retarded XXL^^

Aber jetzt hab ich mich zumindest mal mehr über Case informiert.
Vielen Dank für eure Hilfe, insbesondere Santa *wink.gif*

 

Moin,

markiere die CheckBox und trage bei "ControlTipText" deinen Kommentar ein, den du als ToolTip sehen möchtest. Alternativ geht das natürlich auch in dem Code der UserForm.

 

Daran hab ich auch schon gedacht.

Allerdings hab ich Excel2013 und bei Eigenschaften ist diese Option nicht verfügbar... hab es ewig gesucht...

-> Das wäre natürlich der einfachste Weg *wink.gif*

 

Excel 2013 habe ich auch ...

 

Hallo Günther,

vermutlich meint der TE Checkboxen, die sich in einem Tabellenblatt befinden und da gibt es diese Eigenschaft (zumindest unter Excel 2007) nicht.

 

Danke Stefan,

so könnte es sein. Und vielleicht definiert der TE ja "Userform" (in Beitrag #5) anders als ich ... Oder ich habe es falsch verstanden.

 

...schlimm, schlimm... für ActiveX gibt es tatsächlich keinen ToolTip...
...'ne Msgbox ist auch keine Lösung. Was bleibt denn da noch? Die Statusbar (da schaut eh kaum einer hin), die Ausgabe in einer Zelle oder... in einer ActiveX TextBox.
Das Dilemma, in VBA gibt es keine EventHandler oder Delegaten. Wenn man nicht gerade eine Checkboxklasse hat, dann muss man eben doch für jede Checkbox entsprechenden Code eingeben. Aber.... das kann man ja trotzdem entschlacken durch auslagern. Hier mal ein Bsp. mit 2 Checkboxen, einer TextBox, die außerdem auch den Wert der jeweils aktiven Zelle anzeigt:

Die TextBox heißt hier txtAusgabe!

Code:

+

PS: Wenn die TextBox nur sichtbar sein soll, wenn man über die Checkboxen moved, kann man ja noch die Visible Eigenschaft der TextBox anpassen.... und einen ToolTip simulieren (im Bsp. 3 Sekunden anzeigen. Aber... das MouseMove Ereignis würde ich dazu nicht empfehlen....*wink.gif*
Code: