Excel 将值添加到格式(范围(“a1”)和“MMMM yyyy”)

Excel 将值添加到格式(范围(“a1”)和“MMMM yyyy”),excel,vba,Excel,Vba,我试图创建一个宏,将当前报告备份到一个单独的文件夹中,我想知道是否有办法在Format函数中添加值 例如: ActiveWorkbook.SaveAs Filename:= _ "\\<IP ADDRESS>\" & Format(Range("a1") + 32, "MMMM yyyy") & "\<file name>" & Format(Range("a1"), "mm dd yy")&".xlsx" In my Workbo

我试图创建一个宏,将当前报告备份到一个单独的文件夹中,我想知道是否有办法在Format函数中添加值

例如:

ActiveWorkbook.SaveAs Filename:= _
   "\\<IP ADDRESS>\" & Format(Range("a1") + 32, "MMMM yyyy") & "\<file name>" & Format(Range("a1"), "mm dd yy")&".xlsx"

In my Workbook, Cell A1 is 09/01/2014
ActiveWorkbook.SaveAs文件名:=_
“\\\”格式(范围(“a1”)+32,“mm-mm-yyyy”)和“\\”格式(范围(“a1”),“mm-dd-yy”)和“.xlsx”
在我的工作手册中,A1单元是2014年1月9日

当我运行宏时,我得到一个错误。有人能告诉我这个问题的正确方向吗?我有15-20个文件需要以这种方式备份。

如果文件名不包含任何非法字符,并且文件夹存在,则公式看起来很好。确保激活的工作表是带有日期的工作表。如果不需要,请在更改图纸之前将日期保存到变量中,或者通过编程方式生成所需的日期

比如:

日期=范围(“a1”)
ActiveWorkbook.SaveAs文件名:=_
“\\\”格式(日期+32,“MMMM yyyy”)_
&\“&格式(日期为年月日)和“.xlsx”
如果文件夹格式(日期+32,“MMMM yyyy”)不存在,则必须先创建它:

MkDir \\<IP ADDRESS>\" & Format(theDate + 32, "MMMM yyyy")
MkDir\\\”&格式(日期+32,“MMMM yyyy”)

您得到的错误是什么?没有您的准确数据,我们无法复制它。“我得到一个错误。”“不是问题描述,除非您告诉我们错误是什么,包括您看到的确切错误消息。你有可用的信息;如果你想让我们帮助你,没有理由不提供给我们。我刚刚发现了DateAdd函数。DateAdd(“m”,1,Range(“a1”)将提供我所看到的内容。我也感谢你的帮助。
MkDir \\<IP ADDRESS>\" & Format(theDate + 32, "MMMM yyyy")