代码之家 › 专栏 › 技术社区 › Nn Nn

自从一行中的特定单元格被更改后,我如何跟踪日期?

vba excel

1

Nn Nn · 技术社区 · 1 年前

自从一行中的特定单元格被更改后,我如何跟踪日期?并保持今天的日期刷新和更新。(对于整列的行,因此每一行都会更新该行旁边的更改)

所以说,当一行中的单元格被修改时,我想跟踪单元格B、C、F、G、L的变化。它更新为AC,显示单元格更改的最后更新日期。并且不仅仅是点击进入,而是实际更新和更改数据。

因此,如果B2、F2或L2等中的数据发生变化,则AC2中的日期会更新

除了知道如何输入代码外,我对vba的知识几乎为零

我想自动跟踪并自动更新

经过一段时间的搜索,我发现了这个,但我不知道如何将其设置为一组特定的列,比如只有在B、C、F、G、L列中更改了某些内容时才更新

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Range("$D:$N"), Target) Is Nothing Then
       Range("G" & Target.Row).Value = Date
    End If
End Sub

此外,即使我不输入新信息,只需点击单元格,它也会更新。其中,我只希望它在数据实际更改时更新。

我还希望即使我没有点击单元格,today函数也能保持最新。

我算出了计算2之间时差的部分

1 回复 | 直到 1 年前

1

0

Black cat 1 年前

您可以定义不连续的范围,如下所示:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Range("B:B,C:C,F:F,G:G,L:L"), Target) Is Nothing Then
       Range("AC" & Target.Row).Value = Date
    End If
End Sub