添加一個值來格式化（範圍（「a1」），「MMMM yyyy」）

-1

我試圖創建一個宏，使當前報告備份到一個單獨的文件夾，我想知道是否有在格式函數中添加一個值的方法。添加一個值來格式化（範圍（「a1」），「MMMM yyyy」）

例子：

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

當我運行宏，我得到一個錯誤。有人能指出我在這個方向上的正確方向嗎？我有15-20個文件需要備份。

來源

2014-09-25 craig

什麼是錯誤你得到了嗎？沒有您的確切數據，我們無法複製它。 – 2014-09-25 20:51:40

「我得到一個錯誤」不是問題描述，除非您告訴我們錯誤是什麼，包括*您看到的確切錯誤信息*。你有這些信息可用;如果你希望我們幫助你，沒有理由不把它提供給我們。 – 2014-09-25 22:40:38

公式看起來不錯，只要文件名不包含任何非法字符，並且該文件夾存在。確保活動工作表是具有日期的工作表。如果不是，請在更改工作表之前將日期保存到變量中，或者編程生成想要的日期。

像：

theDate = Range("a1") 

<sheet change> 

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

如果文件夾格式（theDate + 32 「MMMM YYYY」）不存在，您必須首先創建它：

MkDir \\<IP ADDRESS>\" & Format(theDate + 32, "MMMM yyyy")

來源

2014-09-25 21:55:12

我剛剛發現了DateAdd函數。 DateAdd（「m」，1，Range（「a1」））會給我我看的東西。我也感謝你的幫助。 – craig 2014-09-26 13:55:23

添加一個值來格式化（範圍（「a1」），「MMMM yyyy」）

回答

相關問題