投稿日 | : 2002/12/04(Wed) 13:08 |
投稿者 | : nobu |
Eメール | : |
URL | : |
タイトル | : Re^8: 日付の比較 |
> > 日付 = Split("2002/1/1", "/", -1)
> > For j = 1 To 2
> > Select Case 日付(j)
> > Case 1
> > 日付(j) = "01"
> > Case 2
> > 日付(j) = "02"
>
>
> > 比較日付 = 日付(0) & "/" & 日付(1) & "/" & 日付(2)
> > これで、"2002/01/01"="2002/01/01"になって、
" が1ケ抜けていたので削除して再投稿です。
早さはどうか分かりませんが
比較日付 = Format(日付, "yyyy/mm/dd")
...とすればFor文やSelect文は不要では。