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

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

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

追答

就是用的这个啊

温馨提示:答案为网友推荐,仅供参考
相似回答