excel 数值每变一次记录一次

来源:百度知道 编辑:UC知道 时间:2024/09/28 12:23:34
我的数据来自网站的表格,并设定自动刷新,如果人不在电脑前如何知道数值的变化过程,也就是可不可以也自动记录设定的某一单元格数值的变化?等待中......谢谢

你是要记录某单元格数据变化了多少次? 还是要记录其历史数据? VBA 简介如下供参:
右击该工作表, 在打开的窗口中键入下列代码, 请按需修改:

' --------------------------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
Dim strTrackedCell As String

strTrackedCell = "A2" '设定待跟踪的单元格为 A2, 第一行可能用作标题

' 如果 A2 (由 strTrackedCell 赋值) 中的值发生变化的话
If Target.Cells(1, 1).Address(0, 0) = strTrackedCell Then

' strTrackedCell 的变化次数记录在 B1, 不考虑清零需求
Range("B2") = Range("B2") + 1

' strTrackedCell 的历史数据放在 C 列
Range("C65536").End(xlUp).Offset(1, 0) = Range(strTrackedCell)

End If

End Sub
' --------------------------------------------------------