Compartir a través de


Propiedad Application.ODBCErrors (Excel)

Devuelve una colección ODBCErrors que contiene todos los errores ODBC generados por la operación de informe de tabla dinámica o tabla de consulta más reciente. Solo lectura.

Sintaxis

expresión. ODBCErrors

expresión Variable que representa un objeto Application.

Comentarios

Si hay más de una consulta en ejecución al mismo tiempo, la colección ODBCErrors contiene los errores ODBC de la consulta que terminó en último lugar.

Ejemplo:

Este ejemplo actualiza la tabla de consulta uno y muestra los errores de ODBC que se hayan producido.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.