计算单元格更改的时间并填充不同工作表中的单元格

Question

假设有两个工作表1，工作表2.两个工作表都有一个“数字”列，它将记录连接在一起 Workshhet 2对“Number”列中的每个唯一编号都有“Date”列，每当工作表2“日期”列更改时，我想更新工作表1中的列“Times Changed”，以获取与工作表1相关联的唯一编号唯一的工作表数量2。 请帮帮我们！ ：）

我试过以下

Private Sub Worksheet_Change(ByVal Target As Range) 
If Target.Address = "$A$1" Then [C5].Value = [C5].Value + 1 
End Sub

Answer 1

您的代码应该在同一张表中。如果您想计算单元格在其他工作表中更改的次数，例如Sheet2，那么您必须将代码更改为：

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("A1:A100")) Is Nothing Then
        ActiveWorkbook.Sheets("Sheet2").Cells(Target.Row, 3).Value = ActiveWorkbook.Sheets("Sheet2").Cells(Target.Row, 3).Value + 1
    End If
End Sub

此更改事件仅对A1:A100中的单元格的更改做出反应，然后更改Sheet2上C行中相应单元格中的计数。