Setting a default date in a form

Feb 28th, 2002, 08:50 AM

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 · Feb 28th, 2002, 08:52 AM

=TODAY()

Mudface · Feb 28th, 2002, 08:54 AM

Just use

=Date

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

=Format(Date, "mmmm dd yyyy")

Feb 28th, 2002, 09:00 AM

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 · Feb 28th, 2002, 09:05 AM

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).

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Feb 28th, 2002, 08:50 AM	#1
Guest Posts: n/a	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?

Feb 28th, 2002, 08:52 AM	#2
Steve Hartman Board Regular Join Date: Feb 2002 Location: Houston,Texas Posts: 418	=TODAY()

Feb 28th, 2002, 08:54 AM	#3
Mudface MrExcel MVP Join Date: Feb 2002 Location: Sunny, spring-like Hull Posts: 3,339	Just use =Date Wrap a format around it to display how you want it to appear eg =Format(Date, "mmmm dd yyyy")

Feb 28th, 2002, 09:00 AM	#4
Guest Posts: n/a	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

Feb 28th, 2002, 09:05 AM	#5
Mudface MrExcel MVP Join Date: Feb 2002 Location: Sunny, spring-like Hull Posts: 3,339	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).