|
テキスト形式で日付をCDATE関数使って、日付に変更しているのですが、
英語版のofficeにてdd/mm/yyyyで使う必要があるのですが、できますか?
If Format(Val(Workbooks(BOOKNAME3).Worksheets(SHEETNAME3).Range("O" & i1 + 1).Value), "00000000") _
>= Format(DateAdd("d", 14, CDate(ThisWorkbook.Worksheets(SHEETNAME1).Range("V13").Value)), "yyyymmdd") Then
'>= Format("yyyymmdd", DateAdd("d", 14, CDate(ThisWorkbook.Worksheets(SHEETNAME1).Range("V13").Value))) Then
MsgBox "DATE is Error!" & Chr(13) & Chr(10) & "ITEM_NO : " & _
Workbooks(BOOKNAME3).Worksheets(SHEETNAME3).Range("A" & i1 + 1).Value
このプログラムは登録された日付が2週間以上先の場合エラーを返すようにしてあるのですが、どうもddmmyyyyに変えると 2005/09/01 が 01/09/7627とか訳わからない年が表示されてしまいます。どなたかご教示ください。
使用しているのは英語版のexcel2000です。
|
|