返回列表 上一主題 發帖

[發問] 日期比餃錯誤??

t8899

帖子
760 
主題
250 
精華
0 
積分
1023 
點名
0  
作業系統
windows 11 
軟體版本
OFFICE2021 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2024-11-30 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2019-6-4 17:46 | 只看該作者

[發問] 日期比餃錯誤??

6/3 比6/4 大????? Book2.rar (56.12 KB)
收藏 分享

zheng211016
　暱稱: zheng逸

中學生Rank: 2

帖子
99 
主題
15 
精華
0 
積分
164 
點名
2  
作業系統
WIN7 
軟體版本
office2010 
閱讀權限
20 
性別
男 
註冊時間
2017-5-30 
最後登錄
2024-10-5 
2#
發表於 2019-6-4 22:01 | 只看該作者
我猜如果我不回應該沒人想回 根本連問問題都不會
6/4當然比6/3號大
你檔案裡面根本沒有任何設定 唯獨有一欄是黃色底色 裡面也沒有格式化條件

TOP

n7822123
　暱稱: 阿龍

中學生Rank: 2

帖子
406 
主題
8 
精華
0 
積分
453 
點名
0  
作業系統
WINDOWS 7 
軟體版本
2007 
閱讀權限
20 
性別
男 
來自
台灣 
註冊時間
2015-2-7 
最後登錄
2021-7-31 
3#
發表於 2019-6-4 22:22 | 只看該作者
回復 1# t8899

格式請先弄正確，才來比大小
6/3=2 > 6/4=1.5 合理阿:lol

自己試:
=IF(6/3>6/4,TRUE,FALSE)
程式是依需求寫的，需求表達不清楚
或者沒有上傳附件，愛莫能助

TOP

t8899

帖子
760 
主題
250 
精華
0 
積分
1023 
點名
0  
作業系統
windows 11 
軟體版本
OFFICE2021 
閱讀權限
50 
性別
男 
註冊時間
2011-5-30 
最後登錄
2024-11-30 
4#
發表於 2019-6-5 06:56 | 只看該作者
Columns("J:J").Select
Selection.NumberFormatLocal = "yyyy/m/d;@"
If CDate(Left(Cells(k, "J"), 3) + 1911 & Mid(Cells(k, "J"), 4, 6)) < Date Then

TOP

准提部林

帖子
2836 
主題
10 
精華
0 
積分
2892 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2024-11-30 
5#
發表於 2019-6-5 10:40 | 只看該作者
d = DateValue("r" & [J20])  '民國年轉西元
MsgBox d

TOP

        靜思自在 : 改變自己是自救，影響別人是救人。
返回列表 上一主題