Public Sub myStart(ByVal iId As String, Optional ByRef iObject As Object) Dim log As Log4vba: Set log = myLogger.startMethode("myStart", iId, iObject) On Error GoTo Err_Handler myMethode iId, Array(1, 2), iObject Exit Sub Err_Handler: Debug.Assert log.error(Err) End Sub