VBA Excel在文本框中提供当前日期

Question

当用户单击宏按钮时,我会出现一个对话框.此对话框主要填写(日期,电子邮件,制作人,网站等已填写),用户需要做的就是输入他们的名字.问题是输入的日期是静态的,所以如果我输入"3/3/11"它会保持这种状态直到有人改变它.

我想知道该文本框是否有某种方式始终显示当前日期(除非用户决定因任何原因更改它).我尝试将不同的东西放入文本框的"值"部分(例如"getDate()"和"= Date()"),但到目前为止还没有成功.

谢谢,

杰西斯莫瑟蒙

Answer 1

使用表单Initialize事件,例如:

Private Sub UserForm_Initialize()
    TextBox1.Value = Format(Date, "mm/dd/yyyy")
End Sub