如何在 Excel 中監控單元格的變更？

如果在 Excel 中數據發生變化，您該如何監控工作表中的單元格呢？這可能有助於您快速識別已更改的單元格。本文將介紹一些有趣的方法來處理這個任務。

使用「追蹤變更」功能監控 Excel 中的單元格變更

使用 VBA 程式碼監控 Excel 中的單元格變更

使用「追蹤變更」功能監控 Excel 中的單元格變更

Excel 有一個實用的「追蹤變更」功能，可以幫助您標記已更改的單元格，請按照以下步驟操作：

1. 點擊「檢閱」>「追蹤變更」>「選取項目的背景色」，請參見截圖：

2. 在「選取項目的背景色」對話框中，進行以下操作：

(1.) 勾選「編輯時追蹤變更。這也會共享您的工作簿。」

(2.) 在「要突出顯示的變更」部分下，根據需要指定「時間」、「誰」和「哪裡」項目。

(3.) 最後，勾選「在屏幕上突出顯示變更」選項。

3. 完成設置後，點擊 「完成」按鈕，現在，當您更改指定單元格中的任何單元格值時，更改的單元格周圍會出現帶有三角形圖標的邊框，請參見截圖：

注意：使用此方法，您的工作簿將成為一個共享工作簿。

使用 VBA 程式碼監控 Excel 中的單元格變更

以下 VBA 程式碼也可以幫助您在單元格值發生變化時進行監控，請按照以下步驟操作：

1. 右鍵單擊您想監控單元格變化的表格標籤，並從上下文菜單中選擇「查看代碼」，在打開的 Microsoft Visual Basic for Applications 視窗中，請複製並將以下 VBA 程式碼粘貼到模組中：

VBA 程式碼：監控 Excel 工作表中的單元格變更：

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160728
    Dim xrng As Range
    Set xrng = Range("A1:E7")
    If Not Application.Intersect(xrng, Range(Target.Address)) _
           Is Nothing Then
        MsgBox "Cell " & Target.Address & " has changed.", vbInformation, "Kutools for Excel"
    End If
End Sub

注意：在上述程式碼中，A1:E7 是您想要監控單元格變化的數據區域，您可以根據需要進行更改。

2. 然後保存並關閉此代碼窗口，現在，當您更改指定範圍內的單元格值時，將彈出一個消息框提醒您，請參見截圖：