VBA 表單功能發問 - Excel程式區 - 麻辣家族討論版版

[發問] VBA 表單功能發問

21^# 跳轉到 »

發表於 2023-2-12 15:02 | 只看該作者

回復 20# v03586

V = InStr("+H0DP", xF(1, 3)) - 1 這也要加"P"

D = CDate(format(20230130, "00-00-00")) '即可轉成日期
if D - Date < 90 then msgbox "已過期"

靜思自在 : 地上種了菜，就不易長草；心中有善，就不易生惡。