使用當前日期自動更新Excel中的單元格隨時更新或更改列中的任何單元格

Question

不確定在Excel中是否可以這樣做，但是我希望單元格K9每次都更新爲今天的日期任何單元格都在K11:K119被改變。 K11:K119中的某些單元格爲空白，但可以隨時將數據輸入到它們中。已有數據的K11:K119中的單元格可能會更改。因此，我希望cell K9隨時更新，並隨時更新K11:K119中的任何單個空白單元格隨數據更新，或任何時候K11:K119中的任何單個單元格隨數據更改。希望這是有道理的。

Answer 1

將工作表中的代碼區下面的事件宏：

Private Sub Worksheet_Change(ByVal Target As Range) 
    Dim r1 As Range, r2 As Range 
    Set r1 = Range("K9") 
    Set r2 = Range("K11:K119") 
    If Not Intersect(Target, r2) Is Nothing Then 
    Application.EnableEvents = False 
     r1.Value = Date 
    Application.EnableEvents = True 
    End If 
End Sub 

宏觀監控的更改到工作表。如果更改輸入範圍中的任何值，則會刷新具有日期的單元格。

因爲它是工作表的代碼，這是非常容易安裝和自動使用：

1. 右鍵單擊靠近Excel窗口底部的標籤名稱
2. 選擇查看代碼 - 這帶來了一個VBE窗口
3. 粘貼的東西並關閉VBE窗口

如果您有任何問題，首先嚐試在一個審判工作。

如果保存工作簿，宏將與其一起保存。 如果您正在使用一個版本的Excel更高然後2003，你必須保存 該文件作爲.XLSM而非的.xlsx

要刪除宏：

1. 彈出窗口VBE如上
2. 清晰的代碼進行
3. 關閉VBE窗口

要了解更多關於一般的宏，請參閱：

http://www.mvps.org/dmcritchie/excel/getstarted.htm

和

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

要了解更多有關事件宏（工作表的代碼），請參閱：

http://www.mvps.org/dmcritchie/excel/event.htm

宏必須爲此工作啓用！

Answer 2

如果你不想啓用宏，嘗試一些簡單的：

=IF(COUNT(K11:K119)>=0,TODAY(),0) 

COUNT(range)永遠是≥0（所以它不會不管你怎麼把作爲第三個參數），它總是當範圍的任何成員改變時更新。