Excel 另存為按鈕宏

Question

我想為 Excel 創建一個 VB“另存為”宏，它將利用單元格B7 、 B5和=NOW中的數據作為文件名。 然后，這個新文件名將保存到特定目錄。 （例如，用戶單擊“保存”按鈕。 File name = (B5)ABCD_(B7)EFGH_=NOW已創建，然后保存到我選擇的目錄中。

我找到了提供一些單一選項的腳本，但沒有找到或使用這些選項創建我自己的腳本。 任何幫助將不勝感激。

Answer 1

您需要用句點或其他內容替換文件名中的無效字符（它們不能包含/或: ）。

Sub DateFile()
    Dim str As String
    str = Range("B5").Value & "ABCD_" & Range("B7").Value & "EFGH" & Now()
    str = Replace(str, "/", ".")
    str = Replace(str, ":", ".")
    ActiveWorkbook.SaveAs (str)
End Sub

然后可以將其集成到您的按鈕代碼中。