Freigeben über


ODBCErrors-Objekt (Excel)

Eine Auflistung von ODBCError-Objekten .

HinwBemerkungeneise

Jedes ODBCError-Objekt stellt einen Fehler dar, der von der zuletzt ausgeführten ODBC-Abfrage zurückgegeben wurde. Wenn die angegebene ODBC-Abfrage ohne Fehler ausgeführt wird, ist die ODBCErrors-Auflistung leer. Die Fehler in der Auflistung werden in der Reihenfolge indiziert, in der sie von der ODBC-Datenquelle generiert werden. Sie können der Auflistung keine Elemente hinzufügen.

Beispiel

Verwenden Sie die ODBCErrors-Eigenschaft des Application-Objekts , um die ODBCErrors-Auflistung zurückzugeben. Im folgenden Beispiel wird die erste Abfragetabelle aktualisiert und jeder auftretende ODBC-Fehler angezeigt.

With Worksheets(1).QueryTables(1) 
 .Refresh 
 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 
 Next 
 Else 
 MsgBox "Query complete: all records returned." 
 End If 
End With 

Methoden

Eigenschaften

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.