Home » ExcelVBA Rangeオブジェクト » VBAで複数のセルが選択されているかを判定する

VBAで複数のセルが選択されているかを判定する

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

「excel vba 複数セル選択判定」
といった検索で、複数のセル範囲が選択されているかを判定するコードについての記事へのアクセスが、割とあります。残念なことに。

「excel vba 複数セル選択判定」
と検索なさった方が求めていたのは、Range.Areasプロパティを使ったコードではないはずです。

［スポンサードリンク］

複数のセルが選択されているか判定するサンプル

複数のセルが選択されているのかを判定するなら、以下のようなSubプロシージャです。

Sub 複数のセルが選択されているかを判定する()
　If Selection.Cells.Count = 1 Then
　　MsgBox "1つのセルが選択されています。"
　Else
　　MsgBox "複数のセルが選択されています。"
　End If
End Sub

Areas.Countの場合はセル範囲の数、
Cells.Countの場合はセルの数が取得できます。

Range.Areasプロパティは、セル範囲のひとかたまりを1つのItemとして持つ、コレクションとしてのRangeを返します。

Range.Cellsプロパティは、個々のセルをItemとして持つ、コレクションとしてのRangeを返します。

Selection.Cells.Countではなく、
Selection.Countでも、複数のセルが選択されているかを判定できるはずですが、私はこういうときこそCellsプロパティを入れておきたい派です。

最近のExcelの場合、上記のSubプロシージャでは実行時エラーが発生するケースもあります。

その場合、Range.CountLargeプロパティを使ってください。

最終更新日時：2020-07-31 15:07

［スポンサードリンク］

Home » ExcelVBA Rangeオブジェクト » VBAで複数のセルが選択されているかを判定する

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
9月21日に日経BP社から、Excel VBAユーザー向けのPython超入門書が出ました↓↓

『Excel VBAユーザーのためのPythonプログラミング入門』の元になった2020年に出した電子書籍です↓↓

Excel VBAから図形を操作する基本を解説したキンドル本です↓↓

Excel VBAからグラフを操作する基本を解説したキンドル本です↓↓

Excel VBAユーザーの皆さんに向けたWord VBAの入門書を書きました↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が初めて書かせていただいた本です↓↓

珍しいPowerPoint VBA本は、オブジェクトブラウザーの使い方を解説した教本でもあります↓↓

PythonのライブラリOpenPyXL（オープンパイエクセル）の入門書をExcel VBAユーザーに向けに書きました↓↓

数式の条件付き書式設定が苦手な方に向けたKindle本です↓↓

2年前(2021年月9)の
人気記事

「ExcelVBA Rangeオブジェクト」の記事一覧