2022年6月1日水曜日 7:28 斜め読みなのではずれていたらご容赦を｡ Findメソッドの検索値に日付型を指定しているのがよろしくないのでは? つまり、値に微妙に差異が生じているため、該当なしになっているのではないですか? 自前できっちり比較してはどうでしょうか?
09と0付で表示されます。 mmm JanDec mmmm JanuaryDecember mmmmm ～D頭文字が表示されます。 d 日数表示します。1～31ができます。 dd 01～が表示できます。 ddd SunSat dddd SundaySaturday aaa 日土 aaaa 日日～土曜日 h 時をします。0～23ができます。 hh 00～が表示で...
Date – 平日の値を抽出するための日付シリアル値。 Firstdayofweek(オプション) – この関数が週の最初の日として使用する曜日を指定する定数です。空白の場合は、日曜日が週の最初の日として使用されます。以下の値のいずれかを指定します。
1～9は01～09と0付で表示されます。 mmm Jan～Dec mmmm January～December mmmmm J～D頭文字が表示されます。 d 日数を表示します。1～31が表示できます。 dd 01～31が表示できます。 ddd Sun～Sat dddd Sunday～Saturday aaa 日～土 aaaa 日曜日～土曜日 h 時を表示します。0～23が表示でき...
例6. 日付が平日か土日かのテスト この例は、ある日付が平日か週末かをテストします。 SubCheckWeekDay()DimdtAsDatedt=CDate("1/1/2020")SelectCaseWeekday(dt)CasevbMonday MsgBox"今日は月曜日です"CasevbTuesday MsgBox"今日は火曜日です"CasevbWednesday MsgBox"今日は水曜日です"CasevbThursday Msg...