セルが選択されているか確認する（TypeName 関数）
セルが選択されているか確認する方法と使用例
TypeName 関数の引数に、Selection を渡し、この時の戻り値が「Range」であればセルが選択されていることを示します。
戻り値が「Range」以外の場合は、セル以外のオブジェクトが選択されていることになります。（ 例：図形を選択 ⇒「Rectangle」, テキストボックスを選択 ⇒「TextBox」など）
（ ※ TypeName 関数 の使い方 )
If TypeName ( Selection ) = “Range” then
’セルが選択されている場合の処理
[ statements ]
Else
’セルが選択されていない場合の処理
[ statements ]
End If
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
Sub Sample_TypeName_Selection() If TypeName(Selection) = "Range" Then MsgBox ActiveCell.Value Else MsgBox "セルは選択されていません" End If End Sub |
実行結果
セルが選択されている場合
図形が選択されている場合
関連記事
-
-
連続データを入力する（AutoFill メソッド）
AutoFill メソッド Excel で、連続するデータを入力する「オートフィ …
-
-
オートフィルタ（アイコンで抽出する）AutoFilter メソッド
オートフィルタ（アイコンで抽出する） Excel 2007 から、条件付き書式で …
-
-
対象のセル・セル範囲に数式があるかどうか調べる（HasFormula プロパティ）
HasFormula プロパティ HasFormula プロパティは、対象のセル …
-
-
セルをアクティブにする・セルを選択する（Activate, Select）
セルをアクティブにする・選択する 【書式：セルをアクティブにする】 object …
-
-
セルを挿入する（Insert メソッド）
Insert メソッド Insert メソッドで、指定した場所に新規の空白セルを …
-
-
入力規則（他セルや数式を利用して許容値を設定）Validation オブジェクト
他のセルや数式を利用して許容値を設定する 入力規則（その5） での設定を、マクロ …
-
-
オートフィルタ（抽出件数の取得・結果集計）AutoFilter メソッド
ワークシート関数の Subtotal 関数 の使い方 VBA には、オートフィル …
-
-
重複するデータを削除（RemoveDuplicates メソッド）
RemoveDuplicates メソッド 指定したセル範囲から重複データを含む …
-
-
セル・セル範囲をコピーする（Copy メソッド）
Copy メソッド Copy メソッドは、セル範囲をコピーし、指定したセル範囲に …
-
-
セルを参照する（Range プロパティ）
Range プロパティ 任意のセルにアクセスするには Range プロパティを使 …