Convert European date and time to US date and time

[Don2415]

I'm sure there is a simple solution, but ...

I have a column of European dates/times (real dates, not text) in a cvs file as d/m/yyyy h:mm and I want to convert it to m/d/yyyy h:mm. I see how to do it if it was only d/m/yyyy but including time messes me up.

thanks

 

[Dave Patton]

"I see how to do it if it was only d/m/yyyy " How would you do it?

With the CSV, format the column to General or Custom format as dd-mmm-yyyy hh:mm
Save the file to Excel such as xlsx or xlsm
Format the column to your preference such as m-d-yy hh:mm or m/d/yyyy hh:mm

 

[Zot]

You need to read the csv as text.You have no example, so here is roughly how it can be done. I'm assuming:
1) Your system is EU date format
2) The csv data is like this in date/time format 4/1/2022 13:00 (d/m/yyyy) in range A1.

Run the code with csv file opened.

Sub ImportDate()

Dim d As Date, t As Date
Dim wbSource As Workbook, wbDest As Workbook
Dim wsSource As Worksheet, wsDest As Worksheet

Set wbSource = Workbooks("Date.csv")  ' Rename accordingly
Set wbDest = ActiveWorkbook

Set wsSource = wbSource.Sheets("Sheet1")
Set wsDest = wbDest.Sheets("Sheet1")

d = DateValue(wsSource.Range("A1").Text)
t = TimeValue(wsSource.Range("A1").Text)
With wsDest.Range("A1")
    .NumberFormat = "M/d/yyyy  hh:mm"
    .Value = Month(d) & "/" & Day(d) & "/" & Year(d) & " " & t
End With

End Sub

 

[Don2415]

"I see how to do it if it was only d/m/yyyy " How would you do it?

With the CSV, format the column to General or Custom format as dd-mmm-yyyy hh:mm
Save the file to Excel such as xlsx or xlsm
Format the column to your preference such as m-d-yy hh:mm or m/d/yyyy hh:mm

Thanks, but this did not work.