SpecialCellsの戻り値はRange

動作検証バージョン：64bit Windows 10 Pro + 32bit Excel（バージョン2010 ビルド13328.20356 Microsoft Store）

「vba SpecialCells(xlCellTypeBlanks) 戻り値」
という検索キーワードでアクセスがありました。

Excel VBAの、SpecialCellsメソッドの戻り値は何なのかを調べていた方による検索です。

［スポンサードリンク］

SpecialCellsメソッドの戻り値はRangeオブジェクト

こういった確認をしたいのなら、オブジェクトブラウザーです。

オブジェクトブラウザーの詳細ペインに「As Range」と表示されているとおり、

Range.SpecialCellsメソッドの戻り値は、Rangeオブジェクトです。
SpecialCellsメソッドで見つかったセルを表すRangeオブジェクトを返します。

オブジェクトブラウザー以外にも、メソッドやプロパティ等の戻り値を調べる方法は複数あります。

まず知っていただきたいのは、VBAのTypeName関数です。

以下のようなコードを実行すると、SpecialCellsメソッドの戻り値の型を表す「Range」がメッセージボックスに表示されます。

MsgBox TypeName(Range("A1:G7").SpecialCells(xlCellTypeBlanks))

ただし、

MsgBox TypeName(Range("A1:G7").SpecialCells(xlCellTypeBlanks))

を実行したときに、A1:G7セルに空白セルが存在しなかった場合には、実行時エラーが発生します。

これを回避するなら、以下のようなOn Error文を入れてください。

Sub sample()
On Error GoTo ErrHandl

　MsgBox TypeName(Range("A1:G7").SpecialCells(xlCellTypeBlanks))

Exit Sub
ErrHandl:
　MsgBox "空白セルは見つかりませんでした。"
　Err.Clear
End Sub

［スポンサードリンク］

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
グラフに関連するオブジェクトモデルの基本を解説した『理解するExcel VBA／グラフ操作の基本』を出しました↓↓

VBAユーザーの皆さんに向けて、Pythonの超入門書をキンドル本として出しました↓↓

通常は1,080円の『Excel VBAユーザーのためのWord VBA入門（1）』が、8月25日まで半額の540円になっています↓↓

1年前(2021年8月)の
人気記事

「SpecialCellsメソッド」の記事一覧