Splitting cell into 3 userform boxes (Deconcatenate)

[meerkatmatt]

Hi all

Hope you can help.

I've been having issues with date formatting when I transfer dates from a userform to the excel workbook (everything moves into US format) even though I've done various formatting in the VBA using functions etc.

What I've now done is to have the date split on the userform into Day Month Year boxes. When I submit this it then concatenates it into 1 cell on the worksheet. What I need to do is when I need to update the userform with other information is to have the date pulled back into the userform in the 3 boxes from the 1 cell. I have got the date in the form of e.g. 23-Sep-2014

Hope this makes sense.

Thank you in advance of your help.

Matt

 

[John_w]

If the date in the cell is an Excel date then you can use these functions to get the 3 parts:

    Debug.Print Day(Range("A1").Value)
    Debug.Print Month(Range("A1").Value)
    Debug.Print Year(Range("A1").Value)

If you need the month name, call the MonthName function.

 

[meerkatmatt]

Thanks John_w, that's really helped. I knew someone would be able to.