エクセル2000VBAについて

質問

エクセル2000VBAで、ワークシート上でESCキーを押したと同じ意味を持つステートメントはどのように記述したらよいのでしょうか?

回答No.3

noname#187541 · ベストアンサー

こんばんは。

コピーモードを解除したいと言うことですね?

Application.CutCopyMode = False

でどうでしょうか。

お礼

ありがとうございました。なんとか出来ました。

回答No.4

GreatDragon

こんばんは。

> ワークシート上にコピー元の範囲に点滅する点線を消したいがために行ったものです。
> もし、他に良い方法がありましたら教えて頂けたら幸いです。
既に回答が出ていますので、別の見方で回答します。

もし、下記のようなコードでしたら
Sub Macro1()
Range("A1").Select
Selection.Copy
Range("A2").Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub

このような↓コードにすると簡単でいいですよ。
（コピー元が点滅しないので、解除の必要がありません。）
Sub Macro2()
Range("A2") = Range("A1").Value
End Sub

更に、下記のようにシートを明記するようにすれば、シートやセルの選択は全く必要ありません。
Sheets("Sheet2").Range("A2") = Sheets("Sheet1").Range("A1").Value

お礼

ありがとうございます。なんとかできました。

回答No.2

toshi_ho

次のようになります。
Application.SendKeys("{ESC}")

お礼

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

回答No.1

noname#123709

HELP使ってますか？
SendKeys "{ESC}", True

補足

ありがとうございます。
実は、このステートメントは実行してみました。
ところが、思ったとおりの効果が現れず、ステートメントが間違っているのではないかと思った次第です。
ＥＳＣキーを実行する狙いは、コピー＆ペーストをＶＢＡで実行したのはいいのですが、ワークシート上にコピー元の範囲に点滅する点線を消したいがために行ったものです。もし、他に良い方法がありましたら教えて頂けたら幸いです。