EXCEL如何用VBA获取日期并且保持不变

Question

如果A1为空，则B1为空，如果A1输入内容，B1自动输入当前日期，并且以后任何时候都不会发生变化
如果A1再次为空，B1为空，只要自动获取的日期，不时间的变化而发生变化

Answer 1

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Column = 1 Then

        If Target = "" Then Target.Offset(0, 1) = "" Else Target.Offset(0, 1) = Now

    End If

End Sub

追问

如果用这个呢？
Private Sub Worksheet_Change(ByVal Target As Range)

end sub

追答

就是用的这个啊