如何在EXCEL单元格中输入系统日期

Question

如题所述

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'代码执行完毕