VBA Date issue

[markgrnh]

Morning all, Sorry doing this without showing the code as I dont have access to it at the moment, but in short I have a calendar form that when selected it transfers that date into a textbox on another userform. Now it all works fine if the day is the 13th or more but if its before the day and month get swapped over.

I am working on UK dates so dd/mm/yyyy and set it up so it formats as date = Format(userform1.textbox2.value , "dd/mm/yyyy") or something like that, sorry dont have access at the moment. Not sure if it matters, but I am from the UK so my reginal settings are set to UK as well.

Is there another way rather than using the format function to make a date stick to the dd/mm/yyyy format so the month and days dont get swapped over when its less than the 13th of the month?

From some research I have seen the use of CDate, but I will be honest, I have never used that, or know how that works.

Sorry I know this is really vague, and I am not giving you all much to look at or work with, but wanted to see if anyone else has had the same issue and worked out a workaround?

Many thanks
Mark

 

[dmt32]

Hi,

What comes out of your textbox is text & need to coerce your string date to date using one of the available type conversion functions like CDate when you post the textbox value to the range. Providing your regional settings are set to use UK format this should result in correct format but you can also apply number format if required

example

With Range("A10")

.Value = CDate(Me.TextBox1.Value)

.NumberFormat = "dd/mm/yyyy"

End With

Do be aware that CDate will error if the value in the textbox is not a recognised date.



Dave

 

[markgrnh]

Amazing thanks Dave, just got to work and tested your above and it worked straight away, many thanks my friend

 

[dmt32]

Most welcome glad suggestion resolved your issue & appreciate your feedback

Dave