Putting a date in a user form

[Boardbud]

I am trying to get a date to auto populate with the current date in my user form. I am struggling to get this correct any help would be appreciated.

Private Sub TransactionDate_Change()
Dim MyDate As String
MyDate = Format(Now, "mm/dd/yyyy")
MyDate = Now
End Sub

 

[AlphaFrog]

Thhis will populate Textbox1 with the current date when you make a change to TransactionDate.

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

 

[Norie]

Where do you want the date to appear on the userform?

You need to use something like this:

TextBox1.Value = Date

 

[ryancgarrett]

If you're running the code outside of the Private Sub make sure you define which form the textbox is in as well.

 

[Boardbud]

Perfect thank you!