Setting a default date in a form

[Guest]

Hi I have a form ready for use that I made on VBA. One of the fields is a date field, and all I want is for it to show as default today's date always

What is the code for this?

 

[Steve Hartman]

=TODAY()

 

[Mudface]

Just use

=Date

Wrap a format around it to display how you want it to appear eg

=Format(Date, "mmmm dd yyyy")

 

[Guest]

This is sort of what I want, it's just that it is a text box and is empty at the moment by default. I want it so tat every time the form loads up, today's date is there as default, showing in the box

 

[Mudface]

If it's named TextBox1, just use

TextBox1.Text = Date
TextBox1.Locked = True ' So it can't be changed, also can do this via the textbox properties window

in the form's UserForm_Initialize event (double-click on the form in the VBA editor, ignore the click event sub that comes up and choose the Initialize event from the right-hand drop-down).