EXCEL一次能输入多少记录
你是要记录某单元格数据变化了多少次? 还是要记录其历史数据? VBA 简介如下供参:
右击该工作表, 在打开的窗口中键入下列代码, 请按需修改:
' --------------------------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
Dim strTrackedCell As String
strTrackedCell = "A2" '设定待跟踪的单元格为 A2, 第一行可能用作标题
' 如果 A2 (由 strTrackedCell 赋值) 中的值发生...全部
你是要记录某单元格数据变化了多少次? 还是要记录其历史数据? 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。收起
