{Funktionsanfang}
On Error Goto ErrHandler
 
{Funktionscode}
 
   Exit Funktion (bzw. Exit Sub)
ErrHandler:
   MsgBox "Der Fehler " & Err.Descprition & " mit der FehlerNr. " & Err.Number
{Funktionsende}

Jemand der wei? das er nichts wei?
wei? mehr als der
der nicht wei? das er nichts wei?.

(FreeBSD the Best for all.)