Как переформатировать отображаемую дату? - PullRequest
Новая
       4

Как переформатировать отображаемую дату?

0 голосов
/ 28 ноября 2018

Я работаю над сохранением электронных писем и вложений.

Мне нужно выяснить, как переформатировать отображение даты по умолчанию, с которым подходит мой код.В настоящее время это приводит к мм / дд / гггг.

Эта дата будет в пути к файлу, где будет сохранено электронное письмо или вложение.Мне нужно, чтобы он был в формате гггг-мм-дд, поскольку я не могу включить косые черты в пути к файлам.

Мой тестовый код, чтобы научиться делать это, выглядит следующим образом: 

Sub testdate()
'Get Friday's Date
Dim NextFriday As Date
NextFriday = Date + 8 - Weekday(Date, vbFriday)

'Popup
MsgBox "Next Friday's Date is " & NextFriday
End Sub

1 Ответ

0 голосов
/ 28 ноября 2018

Рассмотрите возможность использования Format$: 

Sub testdate()
    'Get Friday's Date
    Dim NextFriday As Date
    NextFriday = Date + 8 - Weekday(Date, vbFriday)

    'Popup
    MsgBox "Next Friday's Date is " & Format$(NextFriday, "yyyy-mm-dd")
End Sub
...