対象:Excel2007, Excel2010, Excel2013, Windows版Excel2016
「excelvba エラーセル検索」
「excelvba エラーセルを見つける方法」
「エクセル2007 vba エラーセル 探す」
といった検索で、このサイト・インストラクターのネタ帳へのアクセスが時折あります。
ワークシート上でエラー値のセルを取得するには、Excel VBAで、どのようなコードを書けばいいのかを探していた方による検索です。
[スポンサードリンク]
エラー値のセルを選択するサンプルマクロ
以下のようなExcelマクロで、エラー値のセルだけを選択できます。
Sub エラー値のセルを選択する()
On Error GoTo ErrHandl
ErrHandl:
MsgBox "エラー値のセルはありません。"
Err.Clear
End Sub
On Error GoTo ErrHandl
Dim rng As Range
Set rng = Cells.SpecialCells(xlCellTypeFormulas, xlErrors)
rng.Select
ErrHandl:
MsgBox "エラー値のセルはありません。"
Err.Clear
End Sub
サンプルマクロの解説
エラー値のセルを取得しているのは、
Set rng = Cells.SpecialCells(xlCellTypeFormulas, xlErrors)
の部分です。
RangeオブジェクトのSpecialCellsメソッドの引数に、xlCellTypeFormulas,とxlErrorsを指定しています。
エラー値のセルが存在しないときに、
Set rng = Cells.SpecialCells(xlCellTypeFormulas, xlErrors)
が実行されると、実行時エラーが発生してしまいますから
On Error GoTo ErrHandl (途中省略) Exit Sub ErrHandl: MsgBox "エラー値のセルはありません。" Err.Clear
とエラートラップを入れています。
最終更新日時:2022-10-03 12:28
[スポンサードリンク]
Home » Excel VBA Rangeオブジェクト » SpecialCellsメソッド » エラーのセルを取得する-SpecialCells(xlCellTypeFormulas, xlErrors)