>>647
セルA2からA5に始値、高値、安値、終値の更新はこんな感じでよろしいでしょうか？

Sub SetAlarm()
Application.OnTime Now + TimeValue("00:05:00"), Range("A2:A5")
End Sub