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

≪