ODBCErrors Collection Object [Excel 2003 VBA Language Reference]


A collection of ODBCError objects. Each ODBCError object represents an error returned by the most recent ODBC query. If the specified ODBC query runs without error, the ODBCErrors collection is empty. The errors in the collection are indexed in the order in which they're generated by the ODBC data source. You cannot add members to the collection.

Using the ODBCErrors Collection

Use the ODBCErrors property to return the ODBCErrors collection. The following example refreshes query table one and displays any ODBC errors that occur.

With Worksheets(1).QueryTables(1)
    Set errs = Application.ODBCErrors
    If errs.Count > 0 Then
        Set r = .Destination.Cells(1)
        r.Value = "The following errors occurred:"
        c = 0
        For Each er In errs
            c = c + 1
            r.offset(c, 0).value = er.ErrorString
            r.offset(c, 1).value = er.SqlState
        MsgBox "Query complete: all records returned."
    End If
End With

Properties | Application Property | Count Property | Creator Property | Parent Property

Methods | Item Method

Parent Objects | Application

Child Objects