Excel宏另存為日期

Question

我有一個Macro ，可以使用我的主工作簿並保存一堆帶有不同標簽的不同副本。

一本工作簿的部分示例：

Range("E1:G1").Select
    ActiveCell.FormulaR1C1 = "099 Commercial"
    ChDir "T:\Accounting\Aspen Pre-Payroll (Shared)\_Payroll Emails"
    ActiveWindow.View = xlNormalView
    ActiveWindow.Zoom = 50
    ActiveWorkbook.SaveAs Filename:= _
        "T:\Accounting\Aspen Pre-Payroll (Shared)\_Payroll Emails\099 Payroll Bundle CREW & EXP.xlsx" _
        , FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

因此，宏保存后的標簽看起來像是099 Payroll Bundle CREW & EXP但我希望它看起來像是099 Payroll Bundle 08-23-2016 CREW & EXP ，其中08-23-2016是位於特定單元格中的日期=RC[-1]但是，通常的" & Format(Date, "MM-DD-YYYY") & " & " & Format(Now(), "MM-DD-YYYY") & "將不起作用並給出我彈出編譯錯誤。

我對宏的了解有限，因此不勝感激！

編輯： 我嘗試運行宏時給出的錯誤

Answer 1

嘗試使用Application.Text （用日期替換'now（）'）

ActiveWorkbook.SaveAs Filename:= _
        "T:\Accounting\Aspen Pre-Payroll (Shared)\_Payroll Emails\099 Payroll Bundle" & Application.Text(Now(), "MM-DD-YYYY") & " CREW & EXP.xlsx" _
        , FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False