標題:
[發問]
日期判斷有問題?
[打印本頁]
作者:
t8899
時間:
2016-6-21 07:03
標題:
日期判斷有問題?
如附檔[attach]24530[/attach]
作者:
c_c_lai
時間:
2016-6-21 08:01
回復
1#
t8899
Private Sub CommandButton1_Click()
Dim W, k
For k = 2 To 500
' W = Format(Cells(k, "A"), "YYYY/MM/DD")
W = Cells(k, "A") ' 欄位儲存格式為國曆
' If Cells(k, "A") > Date Then
If W > Format(Date, "EE/MM/DD") Then ' 將 Date 同步轉為國曆
MsgBox Cells(k, "A").Row
Exit For
End If
Next
End Sub
複製代碼
作者:
t8899
時間:
2016-6-21 08:58
回復 t8899
c_c_lai 發表於 2016-6-21 08:01
完全正確, thanks
歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)