Error-Funktion (Beispiel)

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