日期相減 - Excel程式區 - 麻辣家族討論版版

[發問] 日期相減

11^# 跳轉到 »

發表於 2015-10-5 12:50 | 只看該作者

回復 10# sillykin

EXCEL2000版可執行
DT = "85.10.1" '民國
MsgBox "西元：" & DateValue(Replace("r" & DT, ".", "/"))

EXCEL2013版--出現錯誤

9999.jpg (17.14 KB)

12^#

發表於 2015-10-5 13:49 | 只看該作者

回復 11# sillykin

DT = "85.10.1" '民國
D = Split(DT, ".")
D = DateSerial(D(0) + 1911, D(1), D(2))
MsgBox "西元：" & D

13^#

發表於 2015-10-5 23:24 | 只看該作者

回復 12# 准提部林

謝謝大大耐心的指導..感恩

靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言，就如鑽石般珍貴；但對愚人來說，卻像是一把泥土，一點價值也沒有。