Compartir vía


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.