[爆卦]VBA IsDate是什麼?優點缺點精華區懶人包

為什麼這篇VBA IsDate鄉民發文收入到精華區:因為在VBA IsDate這個討論話題中,有許多相關的文章在討論,這篇最有參考價值!作者kgreatheart (神之左手魔之右手)看板Visual_Basic標題[VBA ] 關於 ...


請教關於 isdate的問題

工作表如下所示:(民國/月/日)

---------------------------------
A
1 101/02/28
2 101/02/29
---------------------------------

With ActiveSheet
MsgBox IsDate(.Range("A1").Value) 'True
MsgBox IsDate(.Range("A2").Value) 'False,但民國101年2月29日確實有這天
End With


想寫一段程式,在判斷儲存格為"日期",則將 (民國/月/日) 轉成 (西元/月/日)
但在判斷 (2/29) ,卻會出現錯誤,請教如下程式該如何作修改,謝謝。

Do While IsDate(PT) = True
temp = PT.Value
temp = Left(temp, InStr(temp, "/") - 1) + 1911 & "/" & Mid(temp, InStr(temp, "/") + 1)
PT.Value = temp

Set PT = PT.Offset(1, 0)
Loop

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 180.177.12.249
MOONRAKER:isdate()認為那是西元102年2月29日,當然回答錯誤啦 10/31 01:34
kgreatheart:請問,有辦法修改程式,使判斷正確嗎?謝謝 10/31 12:17
fumizuki:自己拆解字串把年度加上1911,再判斷是否為正確的日期 10/31 12:44
ClubT:你可以打成西元 然後修改格式讓EXCEL顯示民國 10/31 14:12

你可能也想看看

搜尋相關網站