时间戳

首页 > 解决方案 > 我想用文件名另存为，时间戳（空格）文本在 M2（空格）设计格式范围内

excel - 我想用文件名另存为，时间戳（空格）文本在 M2（空格）设计格式范围内

问题描述

我想用文件名另存为，时间戳（空格）文本在范围 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

请帮我处理上面的代码。

标签： excelvba

解决方案

尝试以下...

Filename:=Environ("userprofile") & "\Desktop\" & Format(Now(),"YYYYMMDD HHMM") & " " & sheets(3).range("M2") & " Design Format.xlsx"

推荐阅读