時刻の取得と経過について

質問

Excelで現在の時刻を取得して、１０分後にセルA1に色をつけることができますか。

よろしくお願いします。

現在の時刻をシリアル値にすることはできますか。

回答No.1

hallo-2007

ＶＢＡの力が必要になりますが、宜しいでしょうか。
http://msdn.microsoft.com/ja-jp/library/cc384090.aspx
のサイトが参考になります。
ＯｎＴｉｍｅのメソッドです。
参考までに
ＶＢエディターで
Sub ボタン1_Click()
Application.OnTime Now + TimeValue("00:00:15"), "my_Procedure"
Range("B1").Value = Time
Range("A1").Interior.ColorIndex = 0
End Sub
Sub my_Procedure()
Range("A1").Interior.ColorIndex = 7
End Sub
をコピー
ボタン1_Click()　をクリックすると
１５秒後にmy_Procedure()を実行します。

＞現在の時刻をシリアル値にすることはできますか。
が意味不明でしたので
Ｂ１セルに、クリックした時間が表示されるようにしています。

お礼

ご回答ありがとうございます。ＶＢＡについては初心者で正直よくわかりません。

コピーしてみましたが実行されませんでした。多分、私のやりかたが違うと思います。

例えばエクセル関数等を使用して１５時になるとＡ１セルが赤くなったり、１６時になるとＡ２セルの文字が大きくなったりできるとよいのですが、やはり無理でしょうか。