Enter Today's Date In A UserForm TextBox

[Minitman]

Greetings,

I am trying to enter today's date into a TextBox on a UserForm when I
open the UserForm.

Anyone know how to do this?

Any help will be appreciated.

-Minitman

 

[Gary Keramidas]

how about this?

Private Sub UserForm_Initialize()
Me.TextBox1.Value = Date
End Sub

 

[FSt1]

hi
Private Sub UserForm_Initialize()
TextBox.Value = Date
End Sub

regards
FSt1

 

[FSt1]

hi
typo. that should be textbox1 or what ever your text box designation is.

regards
FSt1

 

[Doug Glancy]

Steve,

Private Sub UserForm_Initialize()
Me.TextBox1.Text = Date
End Sub

hth,

Doug

 

[Minitman]

WOW!

Gary, FSt and Doug - Thanks for the very fast responses! <VBG>

This is the first time I received three reply's that were so much
alike, and all were exactly what I needed.

Thank you all very much.

-Minitman