セルが選択されているか確認する（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 |
実行結果
セルが選択されている場合
図形が選択されている場合
関連記事
-
-
セル内部を参照（Interior プロパティ）
Interior プロパティ Interior プロパティで、セルの内部を参照し …
-
-
セル範囲を結合・結合を解除（MergeCells プロパティ）
MergeCells プロパティ MergeCells プロパティは、指定したセ …
-
-
セルの行番号または列番号を取得（Row プロパティ,Column プロパティ）
Row プロパティ・Column プロパティ Row プロパティは、指定したセル …
-
-
VBA で、ワークシート関数を使用（WorksheetFunction プロパティ）
VBA で、ワークシと関数を使用 VBA から、ワークシート関数を呼び出す場合、 …
-
-
オートフィルタ（日付フィルタ）AutoFilter メソッド
日付フィルタを使用してレコードを抽出する Excel 2007 から「日付フィル …
-
-
グラデーション（Pattern プロパティ・Gradient プロパティ）
セルの背景ににグラデーションを設定する Pattern プロパティを使用するとセ …
-
-
並べ替え（Sort メソッド）
Sort メソッド 任意のセル範囲内で、並べ替えを行います。引数で、並べ替えの条 …
-
-
行・列の表示・非表示（Hidden プロパティ）
Hidden プロパティ Hidden プロパティに True を設定することで …
-
-
オートフィルタ（日付・時刻のグループ化）AutoFilter メソッド
グループ化された日付や時刻で、レコードを抽出する Excel 2007 から日付 …
-
-
セルの値を置換（Replace メソッド）
Replace メソッド 任意のセル範囲内から特定の値を一括して置換します。Fi …