Excel表格内一个单元格如何自动输入系统日期和时间，改时间输入后就不能更改，除非更改系统时间或手动更该

Question

用=now（）下次在打开就变了，不行。
用"cirl+;"加上"shift+ctrl+:"可以是可以，只是每次都要输入太烦了，我想知道是有没有一种函数可以先设定好。当然，如能做到在前面的单元格内输入名称，它要是能自动填好就更好了。我用的是wps表格，加载宏暂时好像还不行，能用函数来解决最好，不行，让我学习一下加载宏也不错，但要解释详细一点， 学校

Answer 1

你所说的情况只能使用宏。按 alt + F11 启动VBA, 在左边的小窗口，显示有你需要输入数据的工作表名称，双击这个工作表名称，然后在右边的空大窗口输入如下代码就可以了：

Public Sub Worksheet_Change(ByVal Target As Range)

On Error Resume Next

'遇到错误继续运行代码

If Target.Column = 1 And Target.Text <> "" Then

'用if函数，如果活动单元格为A列(1就是A列，这里你可以更改为任意列，比如2=B列，3=C列，4=D列等等)且单元格内容为空，则执行下列动作

    Target.Offset(0, 1) = Now

    Selection.NumberFormatLocal = "yyyy-m-d h:mm;@"

'活动单元格的后一列自动填充时间，格式为"yyyy-m-d h:mm;@"

End If

'完成判断

End Sub

'代码执行完毕

Answer 2

Excel中可以用这个办法实现：

在开发工具中点击宏，创建宏，然后写入下面这段代码
Sub Macro1()

ActiveCell.FormulaR1C1 = Now()

End Sub
这段代码的意思是将当前时间的文本值写到选中的单元格中
给这个宏设置一个快捷键，使用的时候选中单元格按快捷键就可以了，写到单元格的是文本，以后都不会变。

wps表格不支持宏，不知道怎么解决。

Answer 3

学习了