如何用VBA来控制excel中的自动当前日期

就是刚打开EXCEL时,日期会自动刷新为当前日期,但我录入文件保存后隔天再打开日期就不会再刷新了。如何用VBA....
最好详细一点儿。谢谢
就是刚打开EXCEL时,日期会自动刷新,但我录入文件保存后隔天再打开日期就不会再刷新了。如何用VBA....

最好详细点儿,我是初学者。谢谢!!!

Private Sub Workbook_Open()
If [a1] = "" Then
[a1] = Date
Else
Exit Sub
End If
End Sub

在工作表标签,右键,查看代码。
双击Thisworkbook,得到一个代码窗口
将这段代码粘贴到Thisworkbook的代码窗口内即可
a1是一个单元格地址
要改变日期的存放地址,请将a1更改为其它单元格地址即可
温馨提示:答案为网友推荐,仅供参考
第1个回答  2010-02-03
'设a1中为公式产生的日期

Private Sub Workbook_BeforeClose(Cancel As Boolean)
[a1] = [a1]
End Sub
第2个回答  2021-01-06

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

第3个回答  2010-02-04
=today()
第4个回答  2010-02-03
直接用now函数不就行了?

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网