OLEDBErrors Collection Object

Microsoft Excel Visual Basic

OLEDBErrors Collection Object

         
Application OLEDBErrors (OLEDBError)

A collection of OLEDBError objects. Each OLEDBError object represents an error returned by the most recent OLE DB query. If the specified OLE DB query runs without error, the OLEDBErrors collection is empty. The errors in the collection are indexed in the order in which they're generated by the OLE DB provider. You cannot add members to the collection.

Using the OLEDBErrors Collection

Use the OLEDBErrors property to return the OLEDBErrors collection. The following example displays the error description and the SqlState property’s value for each OLE DB error in the collection.

For Each objEr in Application.OLEDBErrors
    MsgBox "The following error occurred:" & _
        objEr.ErrorString & " : " & objEr.SqlState
Next objEr

Use OLEDBErrors(index), where index is the index number of the OLE DB error, to return a single OLEDBError object. The following example displays the error description and the SqlState property’s value for the first error returned by the most recent OLE DB query.

Set objEr = Application.OLEDBErrors(1)
MsgBox "The following error occurred:" & _
    objEr.ErrorString & " : " & objEr.SqlState