回復 2#Hsieh
偶像前輩!謝謝!!
不好意思另一有問題請教
Sub 原程式()
If Date > [AA1] Then 執行
End sub
AA1為補助格 [AA1]="IF(ISERROR(EDATE(LOOKUP(9.9E+307,H3:H1200),1)),0,EDATE(LOOKUP(9.9E
+307,H3:H1200),1))"
想省略補助格所以修改如下
Sub 修改程式()
If Date > Application.EDate(LOOKUP(9.9E+307, [H3:H1200]), 1) Then 執行
End sub
程式無法接受請問要如何寫,請不吝賜教辛苦囉!!謝謝再三!!