In diesem Beispiel wird die Error-Funktion verwendet, um Fehlermeldungen auszugeben, die den angegebenen Fehlernummern entsprechen.
Dim FehlerNummer For Fehlernummer = 61 To 64 ' Werte 61 - 64 durchlaufen. Debug.Print Error(Fehlernummer) ' Fehler im Testfenster ausgeben. Next Fehlernummer