セルが選択されているか確認する（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 |
実行結果
セルが選択されている場合
図形が選択されている場合
関連記事
-
-
オートフィルタ（平均より上・平均より下）AutoFilter メソッド
平均値よりも大きい（小さい）値のレコードを抽出 AutoFilter メソッドで …
-
-
網かけ（パターン）の取得・設定（Pattern プロパティ）
網かけ（パターン）を取得・設定する セルの背景に網かけ（パターン）を設定したり、 …
-
-
セル・セル範囲に名前を定義・削除（Name プロパティ・Names コレクション）
セル・セル範囲に名前を定義（Name プロパティ） Range オブジェクトのN …
-
-
セル範囲を結合・結合を解除（MergeCells プロパティ）
MergeCells プロパティ MergeCells プロパティは、指定したセ …
-
-
セル範囲内を検索（Find メソッド）
Find メソッド 指定したセル範囲内の特定の情報を含むセルを検索します。 【書 …
-
-
A1 形式と R1C1 形式を変換、相対参照と絶対参照を変換（ConvertFormula)
ConvertFormula メソッド 数式で参照しているアドレスの相対参照と絶 …
-
-
入力規則（他セルや数式を利用して許容値を設定）Validation オブジェクト
他のセルや数式を利用して許容値を設定する 入力規則（その5） での設定を、マクロ …
-
-
直前のセル・直後のセルを参照する（Previous プロパティ・Next プロパティ）
Previous プロパティ・Next プロパティ Previous プロパティ …
-
-
セル範囲を結合・結合を解除（Merge メソッド・UnMerge メソッド）
Merge メソッド・UnMerge メソッド セルを結合するには、指定したセル …
-
-
オートフィルタ（色で抽出する）AutoFilter メソッド
オートフィルタ（色で抽出する） フォントの色、セルの背景色（条件付き書式による設 …