Преобразовать длинную метку во что-то более короткое?

Question

У меня есть переменная startDate = "24 / Apr / 20 3:51 AM", у меня также есть другая переменная sCreateDate = "2020-04-03T15: 17: 34.000 -0400" .

1. Я бы хотел, чтобы переменная sCreateDate выглядела как переменная startDate
2. Сравните обе переменные и определите, больше ли переменная sCreateDate, чем переменная startDate.

Здесь код, который я использую, но он не работает:

Format(sCreateDate, "MM/DD/YYYY HH:MM")

Answer 1

Вам, вероятно, придется сделать какое-то построение даты / времени. Вот несколько VBA, которые помогут вам:

Function fDateConvert(strDate As String) As Date
    fDateConvert = DateSerial(Left(strDate, 4), Mid(strDate, 6, 2), Mid(strDate, 9, 2)) + TimeSerial(Mid(strDate, 12, 2), Mid(strDate, 15, 2), 0)
End Function

Мы начнем с использования DateSerial, чтобы создать часть даты, и возьмем 4 левых символа, чтобы получить год, шестой и седьмой символы, чтобы получить месяц, а затем девятый и десятый, чтобы получить день.

Затем мы строим временную часть, используя TimeSerial, извлекая части часов и минут из исходной строки и устанавливая секунды равными 0.

И, наконец, эти две части складываются вместе, чтобы дать полное время даты.

С уважением,