另存爲 - 「文件名和日期從單元格」，在20160127格式

所以我一直在尋找和谷歌搜索了很多，我可以找到一些關於如何編碼的好技巧，但沒有關於如何保留日期格式。另存爲 - 「文件名和日期從單元格」，在20160127格式

我想保存一個我在例程中打開的文件，但是以這種特殊格式的日期20160127（因爲它在源單元格中）添加到文件名中。

現在，Fname中的值被存儲爲01/27/2016，而不是其當前格式。

FNAME = [cellwithdate]

Daily.SaveAs（「d：\文檔\ VBA \每日Summary_US_」 & FNAME & 「.XLSX」）

當前文件名是「每日Summary_US_.xlsx」。我可以像這樣添加Fname嗎？我如何保持它的正確格式？

歡呼聲。

來源

2016-01-28 Ken

如果沒有從單元格中獲取日期，它會像**格式（現在，「yyyyMMdd_hhmm」）**，希望這個幫助。 – daniel

或者您可以使用：

Fname = [cellwithdate].Text

，保持細胞的原始格式（因爲它是在源 - 細胞）。

來源

2016-01-28 11:18:00 Fadi

就像一個魅力。 /感謝小夥子們 – Ken

您可以使用格式，以實現自己的目標：

Dim Fname As String 

Fname = Format([cellwithdate], "yyyyMMdd") 

Daily.SaveAs ("D:\Docs\vba\Daily Summary_US_ " & Fname & ".xlsx")

爲了得到當前的日期和時間格式：

Format(Now, "yyyyMMdd_hhmmss")

MSDN與詳細解釋 https://msdn.microsoft.com/en-us/library/office/gg251755.aspx

用於保存文件SaveAs，這是更好地說明文件格式爲：

Daily.SaveAs "D:\Docs\vba\Daily Summary_US_ " & Fname & ".xlsx", xlOpenXMLWorkbook

https://msdn.microsoft.com/en-us/library/office/ff198017.aspx

來源

2016-01-28 11:14:21 daniel

希望你能將評論作爲答案。將文件格式添加到保存命令'Daily.SaveAs「D：\ Docs \ vba \ Daily Summary_US_」＆Fname＆「.xlsx」，xlOpenXMLWorkbook'中也可能很有用。 https://msdn.microsoft.com/en-us/library/office/ff198017.aspx。 –

另存爲 - 「文件名和日期從單元格」，在20160127格式

回答

相關問題