Funktion
Diese Funktion prüft, ob ein Modul Prozeduren hat.
Code
Public Function HatModulProzedur(vbc As VBIDE.VBComponent) As Boolean
With vbc.CodeModule HatModulProzedur = Not (.CountOfDeclarationLines = .CountOfLines) End With
End Function
Beschreibung
Um zu ermitteln, ob eine Modul Prozeduren hat, wird die Anzahl der Zeile des Moduls mit den Zeilen des Deklarationsabschnitts verglichen.
Damit dieser Code funktioniert, ist folgender Verweis erforderlich: