ユーザーに絶対に停止させたくない場合のVBA設定
ユーザー操作によりマクロVBAが実行中に停止させられてしまう場合があります。
再実行可能であれば問題ありませんが、途中で強制停止された場合のデータ保証が出来ないと言った場合もあるでしよう。
「Esc」
「Ctrl」+「Break」
これらのキーによりVBAが停止しては困る場合もあります。
ユーザーに絶対に停止させないVBA
※言うまでもないですが、実行は自己責任でお願いします。
Sub 止められるものなら止めてみろ()
Application.Interactive = False
Application.EnableCancelKey = xlDisabled
Dim i As Long
For i = 1 To 10
'以下は適当に入れたもので特段の意味はありません。
Application.Wait Now() + TimeSerial(0, 0, 1)
DoEvents
MsgBox WorksheetFunction.Rept("ムダ!", i)
Next
Application.Interactive = True
Application.EnableCancelKey = xlInterrupt
MsgBox "ムダな悪あがきでしたね!"
End Sub
Application.EnableCancelKey
xldisabled | 割り込みを無視します。 |
xlErrorHandler | このエラーは?On Error GoTo?ステートメントでトラップできます。 エラー コードは 18 です。 |
xlInterrupt | デバッグ、終了などを行えるように、実行中のプロシージャを停止します。 |
xldisabledを使用した場合、キー操作でマクロVBAを中断させることはできません。
同様に、xlErrorHandlerを使用していてもエラーハンドラーが常にResumeステートメントを使用して戻る場合は、停止させることはできません。
マクロ実行が終了した後は、自動的にxlInterruptに設定されます。
Application.Interactive
通常、このプロパティはTrueです。
このプロパティをFalseに設定すると、キーボードおよびマウスからのすべての入力がブロックされます (コードによって表示されるダイアログボックスへの入力を除く)。
マクロの終了前に必ず設定をTrueに戻してください。
マクロ実行が終了しても、このプロパティは自動的にはTrueに戻りません。
解説
Application.EnableCancelKey = xlDisabled
これだけでも良いと思われますが、更に念には念を入れて、
Application.Interactive = False
こちらも入れています。
Interactiveについては、マクロ終了後も戻らないので、必ずTrueに戻してください。
ユーザーに絶対に停止させないVBAの実行結果



同じテーマ「マクロVBA技術解説」の記事
手動計算時の注意点と再計算方法
VBAの用語について:ステートメントとは
オブジェクト変数とは何か
VBAの小数以下の演算誤差について
スピルでVBAの何が変わったか
CharactersプロパティとCharactersオブジェクト
ユーザーに絶対に停止させたくない場合のVBA設定
印刷範囲の設定・印刷範囲のクリア
VBAの省略可能な記述について
VBAのVariant型について
VBAのインデントについて
新着記事NEW ・・・新着記事一覧を見る
VBA100本ノック 99本目:自動席替え(行列と前後左右が全て違うように)|VBA練習問題(3月2日)
VBA100本ノック 98本目:席替えルールが守られているか確認|VBA練習問題(3月1日)
VBA100本ノック 97本目:Accessからデータを取得2|VBA練習問題(2月27日)
VBA100本ノック 96本目:Accessからデータを取得1|VBA練習問題(2月26日)
VBA100本ノック 95本目:図形のテキストを検索するフォーム作成|VBA練習問題(2月24日)
VBA100本ノック 94本目:表範囲からHTMLのtableタグを作成|VBA練習問題(2月23日)
VBA100本ノック 93本目:複数ブックを連結して再分割|VBA練習問題(2月22日)
VBA100本ノック 92本目:セルの色を16進で返す関数|VBA練習問題(2月20日)
VBA100本ノック 91本目:時間計算(残業時間の月間合計)|VBA練習問題(2月19日)
VBA100本ノック 90本目:セルに重なっている画像の削除|VBA練習問題(2月17日)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得(End,Rows.Count)|VBA入門
2.RangeとCellsの使い方|VBA入門
3.変数宣言のDimとデータ型|VBA入門
4.マクロって何?VBAって何?|VBA入門
5.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
6.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
7.繰り返し処理(For Next)|VBA入門
8.セルに文字を入れるとは(Range,Value)|VBA入門
9.マクロはどこに書くの(VBEの起動)|VBA入門
10.とにかく書いてみよう(Sub,End Sub)|VBA入門
- ホーム
- マクロVBA応用編
- マクロVBA技術解説
- ユーザーに絶対に停止させたくない場合のVBA設定
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。