セルが選択されているか確認する（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 |
実行結果
セルが選択されている場合
図形が選択されている場合
関連記事
-
-
２つ以上のセル範囲を１つにまとめて参照（Union メソッド）
Union メソッド Union メソッドは、２つ以上のセル範囲を１つにまとめて …
-
-
セルを挿入する（Insert メソッド）
Insert メソッド Insert メソッドで、指定した場所に新規の空白セルを …
-
-
グラデーション（Pattern プロパティ・Gradient プロパティ）
セルの背景ににグラデーションを設定する Pattern プロパティを使用するとセ …
-
-
セル範囲を結合・結合を解除（Merge メソッド・UnMerge メソッド）
Merge メソッド・UnMerge メソッド セルを結合するには、指定したセル …
-
-
オートフィルタの設定と解除（AutoFilter メソッド）
AutoFilter メソッド オートフィルタを設定する場合、AutoFilte …
-
-
文字列をセル幅で折り返す（WrapText プロパティ）
WrapText プロパティ WrapText プロパティは、セルに表示されてい …
-
-
列名を取得、列番号を取得（Address プロパティ,Column プロパティ）
列番号を取得する セル番地（「A1」や「B3」）や列名（「A」「B」「C」 …
-
-
数式を非表示にする（FormulaHidden プロパティ）
FormulaHidden プロパティ 数式が入力されたセルを選択するとその数式 …
-
-
入力規則（Validation オブジェクト）
Validation オブジェクト セル範囲に入力できる値を制限するには 入力規 …
-
-
非連続のセルが選択されているか確認する（Areas コレクション）
Areas コレクション の使い方 複数の離れた位置にあるセル範囲を選択した場合 …