Startseite > Tipps & Tricks > Rund um die VB-IDE > Prüfen ob Prozedur vorhanden ist
Team-Moeller.de - Datenbankentwicklung und mehr ...

Prüfen ob Prozedur vorhanden ist

Prüfen, ob Prozedur vorhanden ist

Funktion

Diese Funktion prüft, ob eine Prozedur in einem Modul vorhanden ist.

Code

Public Function IstProzedurVorhanden(strProzedur As String, strModul As String) As Boolean

On Error Resume Next
If IstModulVorhanden(strModul) = True Then IstProzedurVorhanden = Application.VBE.ActiveVBProject.VBComponents(strModul) _ .CodeModule.ProcStartLine(strProzedur, vbext_pk_Proc) <> 0 End If
End Function

Beschreibung

Als erstes wird geprüft, ob das Modul vorhanden ist. Dann wird geprüft, ob die Startzeile der Prozedur ungleich 0 ist. Wenn dies der Fall ist, ist die Prozedur vorhanden. Wenn die Prozedur nicht vorhanden ist, dann greift die Fehlerbehandlung. Die Funktion liefert in diesem Falle "False" zurück.

Verweise

Damit dieser Code funktioniert, ist folgender Verweis erforderlich:

  • Microsoft Visual Basic for Applications Extensibility 5.3 

Microsoft MVP - Thomas Möller


21.04.2017:
TM-VBALineNumbers
Version 1.28.10 bereitgestellt.


27.03.2016:
TM VBA-Inspector:
Installationsroutine überarbeitet.


23.05.2014:
TM-RebuildDatabase
Version 1.75 bereitgestellt.


07.12.2014:
TM-DatenKlassenGenerator
Version 3.55 bereitgestellt.


Powered by CMSimple - Template by CMSimple-Styles.com - Autor:Thomas Möller