Функция Excel2016 vba Format в Windows 10 создает неожиданный разделитель времени

Question

Код ниже использовал заданный разделитель времени, но теперь Excel2016 в Windows 10 дает неправильный результат.

Public Sub TestDateFormat()
    Dim s As String
    Dim d As Date

    d = Now()
    s = Format(d, "yyyy.mm.dd Hh:Nn:Ss")
    Debug.Print s
End Sub

============================================

TestDateFormat

2018.11.08 13.43.26

Windows 10 Pro версия 10.0.17134 Excel для Office версия 16.0.11001.20074

У кого-то еще есть это?

Answer 1

Проблема в функции vba. Формат, кажется, использует данный специальный разделитель для даты, но разделитель из региональных настроек для времени! О, МОЙ БОГ!

Answer 2

Используйте ячейку даты для хранения даты в нужном вам формате:

cell.NumberFormat = "yyyy.mm.dd hh:mm:ss"

Answer 3

StrReverse(Заменить (StrReverse(Формат (d, "yyyy.mm.dd Hh:Nn:Ss")), ".", ":", 1, 2))