Question

我试图更新工作簿中Sheet2的列单元格中的修改/值输入时间，如果特定列的单元格值发生更改，则在Sheet1中。

我正在使用下面不能正常工作的代码，我错过了什么吗？

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("Timesheet[Start Time]")) Is Nothing Then
        
        Sheet2.Cells(Target.Row, 1).Value = Now()
        
    End If
End Sub

希望这是可能的..

请帮帮我..提前致谢：）

Answer 1

将它放在sheet2单元格a1中会做你想要的。当然，您必须使用公式填充表2中的所有单元格，并且您必须将其格式化为您想要的任何日期格式，但它将起作用：

=IF(Sheet1!A1<>"",NOW(),"")

Answer 2

非常感谢斯科特的帮助：）

Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect(Target, Range("Timesheet[Start Time]")) Is Nothing Then
  Sheets("Sheet2").Cells(Target.Row, 1).Value = Now()                 
  End If
End Sub

根据另一个工作表列值更新工作表colmun值

2 个答案: