日付に関する実装をいつも微妙に忘れるので、備忘録的に残しておきます。 日付の文字列(例 20090127)を日付型に代入する Sub example1() Dim strToday As String Dim dateToday1 As Date Dim dateToday2 As Date strToday = "20090127" dateToday1 = CDate(M…