セルが選択されているか確認する(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 |
実行結果
セルが選択されている場合
図形が選択されている場合
関連記事
-
-
非連続のセルが選択されているか確認する(Areas コレクション)
Areas コレクション の使い方 複数の離れた位置にあるセル範囲を選択した場合 …
-
-
フリガナの取得(GetPhonetic メソッド)
GetPhonetic メソッド GetPhonetic メソッドは、指定した文 …
-
-
入力規則(他セルや数式を利用して許容値を設定)Validation オブジェクト
他のセルや数式を利用して許容値を設定する 入力規則(その5) での設定を、マクロ …
-
-
書式で検索(Find メソッド,FindFormat プロパティ)
書式で検索 書式を条件にセルを検索する場合、まず、その書式条件を CellFor …
-
-
入力規則(入力時メッセージの設定)Validation オブジェクト
入力規則の入力時メッセージを表示する Validation.ShowInput …
-
-
セルが結合セルの一部である場合、その結合セルの範囲を取得(MergeArea プロパティ)
MergeArea プロパティ MergeArea プロパティは、指定したセルが …
-
-
セルを参照する(Cells プロパティ)
Cells プロパティ Cells プロパティは、ワークシートの行番号と列番号を …
-
-
オートフィルタ(色で抽出する)AutoFilter メソッド
オートフィルタ(色で抽出する) フォントの色、セルの背景色(条件付き書式による設 …
-
-
入力規則(エラーメッセージの設定)Validation オブジェクト
無効値を入力時に、エラーメッセージの表示 Validation.ShowErro …
-
-
A1参照形式、R1C1参照形式の設定・取得(ReferenceStyle プロパティ)
ReferenceStyle プロパティ ReferenceStyle プロパテ …

