[[20171013181505]]　『残り時間表示させたい』（みみたん）　ページの最後に飛ぶ

『残り時間表示させたい』（みみたん）

お世話になります教えてください
下記の様に時間でマクロ作動が有りました
この時　作動させてから残り　何時間何分見たな表示を
1分毎更新のような形で
ユーザーフォーム　テキストボックスに表示させたいです
宜しくお願いいたします

Sub ssss2()

Application.OnTime Now + TimeValue("2:00:00"), "hitt"

End Sub

＜使用 Excel：Excel2010、使用 OS：Windows7 ＞

Excelのフォームは、VBのものと違って、タイマコントロールが無いのです。なので、フォームでの残り時間表示は困難です。（CPU100％ぶん回しながら時間をチェック、とかなら、比較的簡単に書けますが、残り時間表示フォームがCPU使い切ってしまっては本末転倒…）

なので、2時間後に実行するのではなく、1分後（確実に1分を刻むなら、30秒後）に実行するように変更して、1分後は残り時間の表示（フォームではなく、ステータスバーなら簡単に実現できますよ）だけにして、2時間以上経過していたら、やりたかった処理を行うよう、考え方を変えてみてください。
（???） 2017/10/13(金) 18:28

???様

有難う御座います
考え方変えて
考えてみます

有難う御座いました
（みみたん） 2017/10/13(金) 18:32

コメント返信：

[ 一覧(最新更新順) ]

[[20171013181505]] 『残り時間表示させたい』（みみたん） ページの最後に飛ぶ

[[20171013181505]]　『残り時間表示させたい』（みみたん）　ページの最後に飛ぶ