2016-01-21 89 views
1

我试图更新工作簿中Sheet1的列单元格中的修改/值输入时间,其中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

希望这是可能的..

请帮我..谢谢提前:)

+2

你不希望Worksheet_SelectionChange事件,但Worksheet_Change事件 –

+0

如果工作表Sheet1细胞在1对1点的对应与表2层的细胞,那么它可能是简单只需添加一个在Sheet 2单元格中引用Sheet 1单元格的公式。 – PKatona

+0

感谢斯科特但Worksheet_Change事件也不起作用:( – Linga

回答

0

谢谢你很多斯科特的帮助:)

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 
0

在Sheet2的单元格A1把这个会做你想要什么。当然,你必须填写所有细胞的表2的公式,你就必须对其进行格式化,以任何你想要的日期格式,但它会工作:

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

谢谢PKatona。然而,如果输入在表单1中超出了表单2中的公式范围,那么就存在挑战。因此,如果我们可以通过宏来完成它,那将是非常好的:) – Linga

+0

嗯,是的,你必须将公式放在整个列中,这会很痛苦,但这是一个想法。祝你好运! – PKatona

+0

再次感谢我的朋友:) – Linga

相关问题