時刻検索について

質問

初めての質問です 失礼有りましたらお許しください
エクセルマクロを始めて間もないの者です よろしくお願いします
下記マクロでA列セルに入力した時刻を検索して 結果をB8セルに
表示します（24:00ｈｒ表示）

、、、、A、、、、、B
1、、、9:00
2、、10:00
3、、11:00
4、、12:00
5、、13:00
6、、14:00
7、、15:00
8 、、、、、、、 $A$4

Dim RowG As Range
Set RowG = Range("A:A").Find(what:=TimeValue("14:00"), LookIn:=xlFormulas)
Range("B８") = RowG.Address
"14:00" の検索結果は $A$4と成ってしまい "12:00" の検索結果と成りました。
$A$6 と正しく結果が出る様にするには どの様にすれば良いか ご教授お願い致します
尚 全体の検索確認では14時台に不具合が有るようです。

回答No.2

okormazd · ベストアンサー

LookIn、LookAt、SearchOrder、 MatchByte の設定は、このメソッドが使われるたびに保存されるので、以前の設定によって思わぬ結果になることがあります。したがって、Findメソッドを使うときは、これらを改めて設定したほうがいいのです。

Set RowG = Range("A:A").Find(what:=TimeValue("14:00"), LookIn:=xlFormulas, LookAt:=xlWhole, MatchByte:=True, SearchOrder:=xlByRows)

とかしましょう。

お礼

早速のご回答ありがとう御座いました。
これで 問題解決することが出来ました

これからも機会が有れば ご教授の程 よろしくお願いいたします

回答No.1

watabe007

Set RowG = Range("A:A").Find(TimeValue("14:00"), LookIn:=xlFormulas, LookAt:=xlWhole)

では

お礼

早速のご回答有難うございます
問題解決する事が出来ました。

これからも質問欄を利用することが多くなるかと思います
機会が有りましたら ご教授の程よろしくお願いいたします。