VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

VBA-Begriff: ODBCError-Objekt

Stellt einen ODBC-Fehler dar, der durch die zuletzt ausgeführte ODBC-Abfrage erzeugt wurde. Das ODBCError-Objekt ist ein Element der ODBCErrors-Auflistung. Wird die angegebene ODBC-Abfrage ohne Fehler ausgeführt, so ist die ODBCErrors-Auflistung leer. Die Fehler in der Auflistung werden in der Reihenfolge mit einem Index versehen, in der sie von der ODBC-Datenquelle erzeugt werden.

Verwendung des ODBCError-Objekts

Verwenden Sie ODBCErrors(Index), wobei Index die Indexnummer des Fehlers darstellt, um ein einzelnes ODBCError-Objekt zurückzugeben. Im folgenden Beispiel wird die erste Abfragetabelle aktualisiert und der erste auftretende ODBC-Fehler angezeigt.

With Worksheets(1).QueryTables(1)
    .Refresh
    If Application.ODBCErrors.Count > 0 Then
        Set er = Application.ODBCErrors(1)
        MsgBox "The following error occurred:" &
            er.ErrorString & " : " & er.SqlState
    Else
        MsgBox "Query complete: all records returned."
    End If
End With