Machine UK/US date format in VBA

[Masha92]

Hello everyone,

Hope you are all well and safe!

I was wondering if you can help me with this vba question (which might have been asked before but I couldnt find it)

I want to change yyyymmdd date format to the MACHINE date format. (whether it is dd/mm/yyyy or mm/dd/yyyy)

Can you please help me?

Many thanks!
Masha

 

[RoryA]

You can use DateSerial with Left, Right and Mid to extract the year, month and day parts.

 

[Masha92]

Hi Rorya,

This method will work with dd/mm/yyyy only correct?

Dateserial(left(X,4),mid(X,5,2),right(X,2)

 

[footoo]

Possible alternative :

Sub v()
With Selection
    Select Case Application.International(xlDateOrder)
        Case 0: .NumberFormat = "mm/dd/yyyy"
        Case 1: .NumberFormat = "dd/mm/yyyy"
        Case 2: .NumberFormat = "yyyy/mm/dd"
    End Select
End With
End Sub

 

[RoryA]

DateSerial takes Year, Month and Day arguments in that order, and will return an actual Date value, so there can be no confusion.

 

[Masha92]

Got you. Both solutions will work. I wasnot familiar with application.international. Thanks Rorya and footoo! Much appreciated