Excel VBA質問箱 IV

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

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


30260 / 76732 ←次へ | 前へ→

【51739】マクロ実行中にUserForm表示を更新する方法
質問  はるか  - 07/10/3(水) 2:07 -

引用なし
パスワード
   いま、UserFormのラベルに表示するものをマクロ実行中に
動的に更新したく思いまして、以下のコードを書いてみました。

Private Declare Sub Sleep Lib "KERNEL32.dll" (ByVal dwMilliseconds As Long)

Sub Test()
  Dim myTime
  Dim myRandom
  For i = 1 To 5
    myRandom = Rnd()
    UserForm1.Label1.Caption = myRandom
    Sleep (1000)
  Next i
End Sub

実際に実行すると、最後のmyRandomの値しか表示してくれません。
SleepのところにBreakを張れば5回分表示してくれます。

何とか、1秒ごとにLabel1の表示を更新することはできないでしょうか?
出来ないのはExcelの仕様でしょうか?

ご存知の方、ご教授ください。
宜しくお願いいたします。

0 hits

【51739】マクロ実行中にUserForm表示を更新する方法 はるか 07/10/3(水) 2:07 質問
【51741】Re:マクロ実行中にUserForm表示を更新する... DoEvents 07/10/3(水) 6:38 発言
【51743】Re:マクロ実行中にUserForm表示を更新する... はるか 07/10/3(水) 9:04 お礼

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