A1 內容為 2010/25/25
我以下列陳述式來判斷A1的月份是否為正確格式
If IsError(DatePart("m", Range("A1"))) = False Then
MsgBox ("程式即將中斷.")
End If
結果程式無法執行, 我以下列陳述式來驗證 Datepart("m", Range("A1")) 是否能執行,
MsgBox DatePart("m", Range("A2"))
結果得到 Type mismatch 的錯誤訊息.
又當我把A1的內容刪除時(呈現空白欄位),我再以下列陳述式驗證是否能取得數值,
MsgBox DatePart("m", Range("A2"))
結果傳回 12
照理說,空白的欄位不是沒有資料嗎,為何會取得12的數值?
是否有方法能在截取A1內的月份數字後,當格式不對時或是A1欄位空白時,能帶出文字方塊(MsgBox)?
正確來說,由A1所得到的結果只有13個, 從1~12 以及一個當格式錯誤或欄位空白時所能帶出文字方塊的值. |