Excel表自动填写当天日期,隔天也不会自动改变日期,如何设

如题所述

1、按ALT+F11进入VBE窗口
2、如果你的表在sheet1中,你就点左边工程管理器里的sheet1(总之你在哪个表中要实现这个功能就点开哪个工作表)。
3、在右边的窗口中输入下边代码:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 And Target.Value <> "" Then
Target.Offset(0, -1) = Format(Date, "dd日")
End If

End Sub
4、这样你回到工作表,在B列输入数据
A列就会出现当前日期。追问

你好,谢谢你你帮忙。我想问如果C1填入内容,F1就自动填写日期,正确要怎样设置

温馨提示:答案为网友推荐,仅供参考
第1个回答  2014-03-18
总结下,常用的三种方案:
一,使用函数如 today()不能实现不变的日期。
二、VBA,你会的话,就不来这里问了。不过你照抄上边的也行,需要灵活运用,自己修改下。
三、用快捷键输入,ctrl+;
第2个回答  推荐于2021-01-06
在单元格里输入=today()。得出当前日期后。复制-选择性粘贴-值和数字格式。
第3个回答  2020-12-18

不改变原始表格数据,打印时自动添加打印日期。

相似回答