Excel VBA Escキー押下をコードで表わすと…

質問

Excel VBA　Escキー押下をコードで表わすと…

Excel2003を使用しています。
ある列をダブルクリックすると、指定した範囲のセルを塗りつぶすイベントマクロを作成しました。
ダブルクリックで塗りつぶされた後は、セルが編集状態になっているので、Escキーを押して編集状態を解除していましたが、Escキーを押して編集状態を解除するところまでをコードに書いたらどうかと思い、塗りつぶしを指定しているコードの後に、『SendKeys "{ESC}"』と追加してみたのですが、追加する前と同じ状況で、編集状態のままでした。

Enterや↓キーを押した場合を試しに書いてみると、塗りつぶされた後、1つ下のセルに移動しました。
コードを追加した場所がいけないのか、それとも、使い方が間違っているのか…？？
どなたかわかる方がいらっしゃいましたら、教えていただけないでしょうか。
よろしくお願いします。

回答No.1

myRange · ベストアンサー

ダブルクリックイベントの引数CancelにTrueをセットすれと編集モードが解除されます。

'--------------------------------------------------
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

　　===塗りつぶしのコード===

　　Cancel = True　　　　'●編集モードの解除

End Sub
'---------------------------------------------------

以上です。

お礼

myRange さま、回答ありがとうございます。

ダブルクリックイベントの引数CancelにTrueをセットしなければいけないのですね。
Trueをセットすると、指定したセル以外でのダブルクリックでも、セルを編集状態にできなくなりますが、今回の場合はこれでも問題はなさそうです。

ありがとうございました。

回答No.2

shinkami

>編集状態
？　コピーモードじゃないですか

Application.CutCopyMode = False
ではダメですか

補足

＞ ？　コピーモードじゃないですか

いいえ、編集状態です…。
F2キーを押下した状態と同じで、カーソルが点滅していて画面左下に『編集』と表示されています。