Propriété Application.ODBCErrors (Excel)

Renvoie une collection ODBCErrors qui contient toutes les erreurs ODBC générées par la table de requête ou l’opération de rapport de tableau croisé dynamique la plus récente. En lecture seule.

Syntaxe

. ODBCErrors

expression Une variable qui représente un objet Application.

Remarques

Si plusieurs requêtes s’exécutent en même temps, la collection ODBCErrors contient les erreurs ODBC de la requête qui se sont terminées en dernier.

Exemple

Cet exemple montre comment actualiser la table de requête 1 et afficher toutes les erreurs ODBC.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.