Получить время в имени файла сохранить в слове макрос

Question

У меня есть слово macro, которое сохраняет do c в формате PDF и отправляет его по электронной почте. Единственная проблема заключается в том, что он будет перезаписывать себя на сетевом диске. Я не могу понять, как получить секунды в имени файла с кодом ниже.

Спасибо за помощь!

dte = Date
savedName = "Night Orders - " & Format(dte, "yyyy-mm-dd")

Response = MsgBox("Save and email the current document?", vbOKCancel, "Are you sure?")
    If Response = vbOK Then

        savePath = saveDir & saveName & ".pdf"
        ActiveDocument.ExportAsFixedFormat OutputFileName:=savePath, _
            ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, _
            OptimizeFor:=wdExportOptimizeForPrint, Range:=wdExportAllDocument, _
            From:=1, To:=1, Item:=wdExportDocumentContent, IncludeDocProps:=True, _
            KeepIRM:=True, CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
            BitmapMissingFonts:=True, UseISO19005_1:=False

Answer 1

Попробуйте:

savedName = "Night Orders - " & Format(Now, "YYYY-MM-DD-hh-mm-ss")