ODBCErrors コレクション オブジェクト
Microsoft Excel Visual Basic のリファレンス |
ODBCErrors コレクション オブジェクト
Application ODBCErrors ODBCError |
ODBCError オブジェクトのコレクションです。各 ODBCError オブジェクトは、最新の ODBC クエリによって返されるエラーを表します。指定された ODBC クエリでエラーが発生しない場合、ODBCErrors コレクションに ODBCError オブジェクトは含まれません。コレクションに含まれるエラーは、ODBC データ ソースにより発生した順序で索引付けられます。コレクションにメンバーを追加することはできません。
使い方
ODBCErrors コレクションを取得するには、ODBCErrors プロパティを使用します。次の使用例は、クエリ テーブル 1 を更新し、発生した ODBC エラーを表示します。
With Worksheets(1).QueryTables(1)
.Refresh
Set errs = Application.ODBCErrors
If errs.Count > 0 Then
Set r = .Destination.Cells(1)
r.Value = "エラー発生 : "
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 "クエリ完了: すべてのレコードが返されました。"
End If
End With