Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Or Target.Column = 2 Then
If Target.Value <> """" Then
ActiveSheet.Cells(Target.Row, 3) = Date
End If
End If
End 作者: 七剑 时间: 2009-1-3 17:48
ACMAIN_CHM 老师啊怎么设置啊?我看不懂啊,求您说详细点好吗?
A1昨天输入数据,今天如果修改A1,D1时间不需要更改,作者: joyark 时间: 2011-7-3 00:35
受益非浅