Question

excel表格中的日期不随系统时间变化而变化。能通过函数来解决吗？B1列输入文本后，C1自动获取系统时间

excel表格中的日期不随系统时间变化而变化。能通过函数来解决吗？B1列输入文本后，C1自动获取系统时间精确2013年4月23日14:02:06，并且这个时间不会再 变
有朋友写了一个VB
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Cells.Count = 1 And .Column = 1 Then
.Offset(0, 1).NumberFormatLocal = "yyyy/mm/dd hh:mm:ss"
.Offset(0, 1).Value = Now
End If
End With
End Sub

可是我用了以后怎么没有反应呢？

Answer 1

右击工作表标签>查看代码>把你的代码粘贴进去后关闭vbe窗口回到excel中.

这段代码是当A列值被修改时在B列记录时间
如果你要B列修改C列记录,column=1改成column=2即可

追问

Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Cells.Count = 2 And .Column = 2 Then
.Offset(0, 1).NumberFormatLocal = "yyyy/mm/dd hh:mm:ss"
.Offset(0, 1).Value = Now
End If
End With
End Sub

追答

我只让你改一个地方,你改多了.

Answer 2

具体你是怎么应用的？能否贴出来看看呢？如果直接拷在宏里面肯定不行，因为你需要给变量Target赋值才行啊

Answer 3

完蛋了，不能回答。

Answer 4

在C1输入=today()

追问

亲，我是想锁定时间不会每次打开每次变！你说的这个办法行不通

追答

就用你上面的VBA就可以了，除了楼上的那个说把column = 1 改为column = 2还不行的话
那你还要在VBE窗口点击“运行”--运行子程序
这样就可以了

追问

怎么今天就出现这个错误了啊 亲能解答一下吗