Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Uma coleção de objetos OLEDBError .
Comentários
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.
Exemplo
Utilize a propriedade OLEDBErrors do objeto Aplicação para devolver a coleção OLEDBErrors .
O exemplo seguinte apresenta 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
Utilize OLEDBErrors (índice), em que o índice é o número de índice do erro OLE DB, para devolver um único objeto OLEDBError . O exemplo seguinte apresenta a descrição do erro e o valor da propriedade SqlState para o primeiro erro devolvido pela consulta OLE DB mais recente.
Set objEr = Application.OLEDBErrors(1)
MsgBox "The following error occurred:" & _
objEr.ErrorString & " : " & objEr.SqlState
Métodos
Propriedades
Confira também
Suporte e comentários
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.