單元格更新時如何在 Excel 中捕獲單元格值

Question

我在 Excel 中有一個單元格，它根據 RAND() 函數進行更新。 每次更新單元格時，我都想在單獨的列中捕獲以前的值。 這樣我以后就可以計算平均值。

怎么實現這個？？

Answer 1

將下面復制到工作表模塊並更改“A1”單元格：

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not (Intersect(Target, Range("A1")) Is Nothing) Then
    i = i + 1
    Worksheets("Sheet1").Cells(i, 2).Value = Worksheets("Sheet1").Cells(1, 1).Value
    End If
End Sub