simpleさん
ご回答ありがとうございました。
>Range("A1").Select
使っていましたが良く理解できていませんでした。
>クリックしたときに動作するというイベントプロシージャはありませんので誤解なきよう。
はい、分かりました。
>また、前半のダブルクリックに関するものは正常動作するんですか?
Call Worksheet_BeforeDoubleClick(Range("A1"), False)を実行しますと以下のイベントに移動しました。
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
深く感謝申し上げます。