セルが選択されているか確認する(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 |
実行結果
セルが選択されている場合
図形が選択されている場合
関連記事
-
-
セルをアクティブにする・セルを選択する(Activate, Select)
セルをアクティブにする・選択する 【書式:セルをアクティブにする】 object …
-
-
現在選択されているセルを参照(RangeSelection プロパティ)
RangeSelection プロパティ 実際に何が選択されているかにかかわらず …
-
-
対象のセルを参照している全てのセルを取得(Dependents プロパティ)
Dependents プロパティ Dependents プロパティは、対象のセル …
-
-
並べ替え(Sort メソッド)
Sort メソッド 任意のセル範囲内で、並べ替えを行います。引数で、並べ替えの条 …
-
-
オートフィルタ(日付フィルタ)AutoFilter メソッド
日付フィルタを使用してレコードを抽出する Excel 2007 から「日付フィル …
-
-
次の検索(FindNext メソッド,FindPrevious メソッド)
FindNext メソッド Find メソッドで開始された検索を継続します。引数 …
-
-
セルの特定の要素のみをペーストする(PasteSpecial メソッド)
PasteSpecial メソッド PasteSpecial メソッドは、Cop …
-
-
オートフィルタの状況を確認(AutoFilterMode, FilterMode)
AutoFilterMode プロパティ AutoFilterMode プロパテ …
-
-
文字列をセル幅で折り返す(WrapText プロパティ)
WrapText プロパティ WrapText プロパティは、セルに表示されてい …
-
-
非連続のセルが選択されているか確認する(Areas コレクション)
Areas コレクション の使い方 複数の離れた位置にあるセル範囲を選択した場合 …

