Objeto ODBCErrors (Excel)
Colección de objetos ODBCError .
Comentarios
Cada objeto ODBCError representa un error devuelto por la consulta de ODBC más reciente. Si la consulta de ODBC se ejecuta sin errores, la colección ODBCErrors estará vacía. Los errores de la colección se indexan en el orden en que el origen de datos ODBC los genera. No se pueden agregar miembros a la colección.
Ejemplo:
Use la propiedad ODBCErrors del objeto Application para devolver la colección ODBCErrors . En el ejemplo siguiente se actualiza la tabla de consulta uno y se muestran los errores de ODBC que han ocurrido.
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
Métodos
Propiedades
Vea también
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.