Question

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

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

最好详细点儿，我是初学者。谢谢！！！

Answer 1

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

在工作表标签，右键，查看代码。
双击Thisworkbook，得到一个代码窗口
将这段代码粘贴到Thisworkbook的代码窗口内即可
a1是一个单元格地址
要改变日期的存放地址，请将a1更改为其它单元格地址即可

Answer 2

'设a1中为公式产生的日期

Private Sub Workbook_BeforeClose(Cancel As Boolean)
[a1] = [a1]
End Sub

Answer 3

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

Answer 4

=today()

Answer 5

直接用now函数不就行了？