エクセル条件付書式で指定の時間が過ぎていたらフォントの色を変える

出勤列(D5:D400)で入力した数字が9時を過ぎていたらフォントが赤になるように
条件付書式を設定したいのですが、うまくいきません。
表示形式は時刻→9：00で時刻のみ表示されるようになっております。
入力はアクティブセルで出勤のボタンを押すと時間が入力できるようにマクロ登録しています。
Sub 出勤()
ActiveCell = Now
End Sub
アドバイスよろしくお願いいたします。

No.2 ベストアンサー 回答者： fujillin 回答日時： 2018/03/01 12:44

こんにちは

Nowで入力しているので、セルの実際の値は、「2018/3/1 9:34:36」のような日付+時刻のシリアル値になっているものと推測します。

D5（～D400）のセルに対して、条件付き書式で
　=HOUR(D5)>=9
の条件式を設定し、書式で赤文字を設定すればできそうですが？

この回答へのお礼

ご返答ありがとうございます！
日付が入っていたために苦戦しておりましたがアドバイスいただいた通りに
入力するとできました！！ベストアンサーに選ばせて頂きます。

お礼日時：2018/03/01 13:56

No.3 回答者： 銀鱗 回答日時： 2018/03/01 13:11

(´・ω・`)？

マクロ必要ないでしょ。
　＝D5>"9:00"
これを条件付き書式の条件に設定すれば良いだけと思うんだ。

＞9時を過ぎていたらフォントが赤になるように
という事なので9時はセーフなんでしょ？
いえいえ、9時もアウト…なら
　＝D5>="9:00"
になります。


・・・余談・・・
条件付き書式を設定するマクロを作りたいという事なんだろうか。

Excelの標準機能で行えるところは標準機能を使うようにしましょう。
でないと修正が必要になったとき、めんどくさいことになりますよ。

この回答へのお礼

ご返答ありがとうございます。
マクロ使用の理由は省略していたので疑問に思う方もいらっしゃると思いましたが、
1回答者様の返信欄に記入した理由により必要でした。
Nowで入力していた為に＝D5>"9:00"は私も試しましたが上手く出来なくて悩んでいました
皆様のご協力により無事に解決しました。

お礼日時：2018/03/01 14:04

No.1 回答者： GOMΛFU 回答日時： 2018/03/01 12:40

なぜにvbaを使っているかが不明ですが、条件付き書式でルールを追加しやればいいだけでは？

この回答へのお礼

回答ありがとうございます。
お返事できていなかったみたいです、すみません。
複数の人間で共有するファイルだったためにパソコンに不慣れな人も間違いなく
簡単に操作できることが優先だったので必要でした。
条件付書式の設定が知りたかったので皆様のご協力にて解決しました。

お礼日時：2018/03/01 15:18