EXCELのマクロ。セルが選択されているかどうか。

質問

Excel2000のVBAでセルが選択されているかどうかチェックしてセル以外の画像などが選択されていればエラーメッセージ、そうでなければマクロを実行させるにはどう書けばいいのでしょうか？

回答No.1

shishishishi · ベストアンサー

TypeNameを使えば選択されているのか何かわかります。
セルであれば"Range"を返してくれます。したがって、

Sub test()
If TypeName(Selection) = "Range" Then
Selection = "=Now()"'セルに現在時間を入れる例
Else
MsgBox "セルを選択してから実行してください。"
End If
End Sub

お礼

はやい回答をありがとうございました。
なるほど、これでできますね。
とてもたすかりました。