'/** ' * Den eigenen Logger definieren ' * @return myLogger ' */ Public Property Get myLogger() As Log4vba Static logger As Log4vba If logger Is Nothing Then Set logger = Log4vba.instance 'Spezielle Settings, wie man die gerne im Projekt hätte logger.typeSettings(ltWarning) = eprOutConsole logger.typeSettings(ltError) = eprOutConsole 'Ich will den DebuMode haben, da mein Projek noch lange nicht fertig ist. logger.debugMode = True End If Set myLogger = logger End Property