Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


34081 / 76732 ←次へ | 前へ→

【47866】Re:マクロを止めるボタンを作りたい
発言  ぱっせんじゃー  - 07/3/24(土) 19:42 -

引用なし
パスワード
   stpの方はコマンドボタンなど
に登録して起動しやすくしておいてください。

以下は全て同じモジュール内に記述してください。

testを実行後、stpを実行してみてください。
処理を中止します。


Dim flg As Boolean
Sub test()
Dim i As Integer
 flg = True
 For i = 1 To 20
 DoEvents
  If flg = False Then
   MsgBox "中止"
   Exit Sub
  End If
  Application.Wait Now + TimeSerial(0, 0, 1)
  ActiveSheet.Cells(1, 1).Interior.ColorIndex = i
 Next i
End Sub

Sub stp()
flg = False
End Sub

2 hits

【47864】マクロを止めるボタンを作りたい ユニフ 07/3/24(土) 19:13 質問
【47866】Re:マクロを止めるボタンを作りたい ぱっせんじゃー 07/3/24(土) 19:42 発言
【47871】Re:マクロを止めるボタンを作りたい ユニフ 07/3/24(土) 23:30 質問
【47898】Re:マクロを止めるボタンを作りたい ぱっせんじゃー 07/3/26(月) 9:23 発言
【47870】Re:マクロを止めるボタンを作りたい りん 07/3/24(土) 23:21 発言
【47883】Re:マクロを止めるボタンを作りたい ユニフ 07/3/25(日) 13:05 お礼

34081 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free