Excel - date format issue in vba

[WaqarCoder]

I am using below code in my userform in order to put todays date by default. The below code sets the date in the given format in my textbox :-

Private Sub UserForm_Initialize()
txt_date.Value = Format(Date, "d/m/yyyy")
End Sub

But when I click Add data, then in the sheet1 the Date column is showing m/d/yy? I even set the Date column format as *dd/mm/yy but it still same issue.
How can I solve this?

 

[dmt32]

Hi,
what comes out of your textbox is a string so try coercing the text date with DateValue conversion function

example

Cells(1, 10).Value = DateValue(Me.txt_date.Value)

Do be aware that if no valid date exists in your textbox the function will error.

Dave

 

[WaqarCoder]

Hi,
what comes out of your textbox is a string so try coercing the text date with DateValue conversion function

example

Cells(1, 10).Value = DateValue(Me.txt_date.Value)

Do be aware that if no valid date exists in your textbox the function will error.

Dave

Where shall i put this code?

 

[dmt32]

I gave an example of how you can use the DateValue function but if you are still unsure publish your forms code here

Dave