ESCキーでVBAを停止させない[ExcelのTIPS]

VBAを実行中にESCキーを押すと処理が停止されてしまいます。プログラムによっては途中で停止されてしまいますと予期せぬ不具合になってしまう場合があります。今回はその停止を回避する方法をご紹介します。

例

ApplicationのEnableCancelKeyに「xlDisabled」を設定するとESCキーボタンを無効にします。有効にするには「xlInterrupt」を設定します。

Private Sub CommandButton1_Click()
  Dim i As Long
  Application.EnableCancelKey = xlDisabled
  
  ' 重い処理
  For i = 0 To 100000
    Range("A1") = i
  Next
 
  Application.EnableCancelKey = xlInterrupt
End Sub

プロシージャなどの処理が完了すると自動的にEnableCancelKeyに「xlInterrupt」が設定されてESCキーが有効になります。ただ、明示的に有効にした方がプログラム的にはわかりやすいです。

エクセル講座のクイックリンク

ホーム 新機能 基本(初級) 基本(中級) 基本(上級) 関数 マクロ VBA TIPS

• Twitter
• Facebook
• はてブ

• Pocket
• LINE

関連記事

この記事を書いた人

	💻 ITスキル・経験 サーバー構築からWebアプリケーション開発。IoTをはじめとする電子工作、ロボット、人工知能やスマホ/OSアプリまで分野問わず経験。 画像処理/音声処理/アニメーション、3Dゲーム、会計ソフト、PDF作成/編集、逆アセンブラ、EXE/DLLファイルの書き換えなどのアプリを公開。詳しくは自己紹介へ
プチモンテ代表、アーティスト名：プチモンテ
🎵 音楽制作 BGMは楽器(音源)さえあれば、何でも制作可能。歌モノは主にロック、バラード、ポップスを制作。歌詞は叙情詩、叙情的な楽曲が多い。楽曲制作は2023年12月中旬 ～

オリジナル曲を始めました✨

YouTubeで各楽曲を公開しています🌈
https://www.youtube.com/@petitmonte