View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
TotallyConfused TotallyConfused is offline
external usenet poster
 
Posts: 144
Default Date on UserForm?

I have a UserForm with a multipage on the first page I have a textbox that I
have assigned Form Date. I want "todays date" to fill the text box on
opening the form. It was working fine but after changes to the form the date
is not visible when form is loaded. I have the following code on

Private Sub UserForm1_Initialize()
Load UserForm1
UserForm1.Show
frmMyUserform.Show vbModeless
Me.txtFormDate = Date
'Me.txtFormDate = format(date,"mm-dd-yyyy")

End Sub

I have tried the following variations with no success. Can someone please
help me with this? Thank you in advance for any help you can provide.

Me.FormDate.Text = Format(Date, "mm-dd-yyyy")
Me.txtFormDate = Date
Me.FormDate = Format(Date, "mm-dd-yyyy")