更改Excel公式單元格成宏VBA

=IF(VAL.EMPTY(K15);"";MAX(K15-Today();0))

這個公式給出了兩個日期之間的差值：

1），即K15：30/10/2017

2）今天，（）

最大倒計時停止在0

我需要到t在宏中轉換此公式以便將這一位代碼插入由Private Sub Worksheet_Change(ByVal Target As Range)運行的宏中。

2017-10-19 Tom

FWIW - 你的公式缺少'''來完成'IF'功能。 – YowE3K

你需要整個代碼還是隻是一個提示如何做到這一點？ – Flocke

我會先嚐試提示，然後看看它是否適合我的代碼。我到現在爲止沒有成功嘗試過的是這段代碼： – Tom

我希望下面的代碼行應該工作，測試工作適合我。

Sheet2.Range("M15:M38").Formula = "=IF(ISBLANK(K15),0,MAX(K15)-TODAY())"

IF代碼中的IF函數的參數太多。你也可以用0來代替「」來保存一個簡單的公式字符串。

2017-10-19 11:06:20

非常感謝。它的魅力。 – Tom

回答