- Excel VBA 質問スレ Part43 [無断転載禁止]©2ch.net
513 :デフォルトの名無しさん[]:2016/10/18(火) 18:50:48.79 ID:IBZ8SVf/ - Sub 時計1()
Dim 一分 As Date 一分 = TimeValue("0:01:00") Cells(1, 1) = Now Application.OnTime Now + 一分, "時計1" End Sub Sub 時計2() Dim 一分 As Date 一分 = TimeValue("0:01:00") Cells(1, 2) = Now Application.OnTime Now + 一分, "時計2" End Sub 表示とSub名以外まったく同じですが 同時に実行すると時計1は0:00で停止しません 時計2は停止します フォーマットに日付入れたりいろいろ変えても同じです これはどういうわけでしょうか
|