Excel中假如我设置A列为数据，B列为日期，怎么设置，我修改A列数据后，B列时间自动更新为当前日期。

右键单击工作表标签
将下面的代码粘贴到VBE窗口中
回到工作表就能正常操作了.这里限制了为A列输入数据,B列会自动输入当天日期.如果需要变更为当前日期和时间,可以把Date 更换为Now

Private Sub Worksheet_Change(ByVal Target As Range)
If Selection.Count = 1 Then
If Target.Column = 1 And Target <> "" Then
Application.EnableEvents = False
Target.Offset(0, 1) = Date
Application.EnableEvents = True
Else: Exit Sub: End If
Else: Exit Sub: End If
End Sub

以下VBA代码，供参考(为worksheet1的Change事件增加处理；代码改好后可导入EXCEL)

Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer
For i = Target.Row To Target.Row + Target.Count - 1
If (Target.Column = 1) Then
Cells(i, Target.Column + 1) = "Changed: " & Now()
End If
Next i

End Sub