Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Aufrufende Funktion oder sub ermitteln

Frage Entwicklung VB for Applications

Mitglied: miniversum

miniversum (Level 3) - Jetzt verbinden

14.10.2009, aktualisiert 10:07 Uhr, 7242 Aufrufe

Kann man herausfinden welche Funktion oder Sub die aktuelle Sub aufgerufen hat?
Alternativ der Name der aktuellen Funktion oder Sub.

Hallo
Ich schreibe gerade eine etwas größere Anwendung in VBA in Excel 2003.
Um Fehler abzufangen habe ich eine Sub "ErrorFunction" die dann im Fehlerfall alles weitere verarbeitet.
Diese Sub rufe ich dann in den Einzelnen Funktionen und Subs im Fehlerfall auf.

Nun sollte in dieser "ErrorFunction" auch eine Meldung ausgegeben werden mit der Art des Fehlers (Err.Description). Außerdem würd ich gerne wissen wo der Fehler entstanden ist. Bisher mache ich das so das ich beim Aufruf der Name der aufrufenden Funktion übergebe, Also so:
Call ErrorFunction("Funktion1")
und in meiner "ErrorFunction" diesen Parameter dann eben mit in die Meldung einbaue.
Nun ist es allerdings recht aufwendig bei jeder Funktion und Sub die die "ErrorFunction" auslöst den Namen anzugeben, da das sehr viele sind und ich doch gerne einen einheitlichen Aufruf hätte. Daher hab ich mich gefragt ob es nicht möglich ist den Namen der aufrufenden Funktion oder Sub direkt in "ErrorFunction" zu ermitteln.
Err.Source liefert mir leider nur den Projektnamen. An den Funktionsnamen allerdings scheint mit VBA mitteln nicht so leicht heranzukommen.

Alternativ habe ich auch schon vesuche den Namen der aktuellen Funktion zu ermitteln und diesen dann an die "ErrorFunction" zu übergeben, statt eines statischen Stings, wie im Beispiel oben das "Funktion1".

Hat hier jemand eine Idee wie das doch gehen könnte? Vielleicht über eine api Funktion oder Abfrage des Stacks oder so?

miniversum
Neuester Wissensbeitrag
Exchange Server

WSUS bietet CU22 für Exchange 2007 SP3 nicht an. EOL Exchange 2007

Tipp von DerWoWusste zum Thema Exchange Server ...

Ähnliche Inhalte
Entwicklung
Captive Portal Seite mit Voucher speichern Funktion (4)

Frage von fisi-pjm zum Thema Entwicklung ...

Microsoft Office
gelöst Excel Marko "private sub" bearbeiten (2)

Frage von ArnoNymous zum Thema Microsoft Office ...

Hyper-V
gelöst HyperV - ungültige MS-DOS Funktion (14)

Frage von Franz-Josef-II zum Thema Hyper-V ...

Heiß diskutierte Inhalte
Exchange Server
Test-ActiveSyncConnectivity Error nach neuem Zertifikat (17)

Frage von Driphex zum Thema Exchange Server ...

Batch & Shell
gelöst Batch xls nach aktuellem Datum auslesen und email senden (14)

Frage von michi-ffm zum Thema Batch & Shell ...

Backup
Datensicherung ARCHIV (12)

Frage von fautec56 zum Thema Backup ...