Я хочу сохранить как с именем файла, так и с текстом отметки времени (пробелом) в диапазоне M2 (пробел) Формат дизайна - PullRequest
0 голосов
/ 25 мая 2020

Я хочу сохранить как с именем файла как, отметка времени (пробел) текст в диапазоне M2 (пробел) Пример формата дизайна: 20200525 1747 Диапазон формата дизайна клиента M2 = Клиент

Sub Make_saveas()

    Worksheets(Array("Sheet1", "Sheet2")).Copy
    With ActiveWorkbook
        .SaveAs Filename:=Environ("USERPROFILE") & "\Desktop\" & Format(Now(), 
        "YYYYMMDD HHMM, sheets(3).range("M2"), "Design Format"")& ".xlsx", 
        FileFormat:=xlOpenXMLWorkbook
        .Close SaveChanges:=False
    End With

End Sub

Пожалуйста помогите мне с приведенным выше кодом.

1 Ответ

0 голосов
/ 25 мая 2020

Попробуйте следующее ...

Filename:=Environ("userprofile") & "\Desktop\" & Format(Now(),"YYYYMMDD HHMM") & " " & sheets(3).range("M2") & " Design Format.xlsx"
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...