Objeto OLEDBErrors (Excel)
Uma coleção de objetos OLEDBError .
Cada objeto OLEDBError representa um erro retornado pela consulta OLE DB mais recente. Se a consulta OLE DB especificada for executada sem erros, a coleção OLEDBErrors estará vazia. Os erros na coleção são indexados na ordem em que são gerados pelo provedor OLE DB. Não é possível adicionar membros à coleção.
Use a propriedade OLEDBErrors do objeto Application para retornar a coleção OLEDBErrors .
O exemplo a seguir exibe a descrição do erro e o valor da propriedade SqlState para cada erro OLE DB na coleção.
For Each objEr in Application.OLEDBErrors
MsgBox "The following error occurred:" & _
objEr.ErrorString & " : " & objEr.SqlState
Next objEr
Use OLEDBErrors (índice), em que o índice é o número de índice do erro OLE DB, para retornar um único objeto OLEDBError . O exemplo a seguir exibe a descrição do erro e o valor da propriedade SqlState para o primeiro erro retornado pela consulta OLE DB mais recente.
Set objEr = Application.OLEDBErrors(1)
MsgBox "The following error occurred:" & _
objEr.ErrorString & " : " & objEr.SqlState
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.