將文件保存爲在新位置使用特定名稱的新版本

我有一個原始的excel文件，每次我必須將其作爲新版本保存在特定文件中，並且具有特定名稱的基於名稱我鍵入單元格D7，而不覆蓋原始文件。我嘗試記錄宏，但未能使其更具動態性（將其命名爲基於單元格D7中的名稱i密鑰）。幫助表示讚賞...將文件保存爲在新位置使用特定名稱的新版本

Sub Macro4() 
    Range("D7").Select 
    ActiveCell.FormulaR1C1 = "walaoei" 
    ActiveWorkbook.SaveAs Filename:="C:\Users\kutan\Desktop\walaoei.xlsm", _ 
    FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False 
End Sub

來源

2013-12-10 user3045580

這是你正在嘗試？

Sub Macro4() 
    Range("D7").Value = "walaoei" 
    ActiveWorkbook.SaveAs FileName:="C:\Users\kutan\Desktop\" & _ 
          Range("D7").Value & ".xlsm", _ 
          FileFormat:=xlOpenXMLWorkbookMacroEnabled, _ 
          CreateBackup:=False 
End Sub

來源

2013-12-10 03:17:02

嗨，如果我想的文件名是我在小區D7這意味着如下第一步鍵的任何名稱：我打開原始文件第二步：在單元格D7名稱i鍵第三步：運行宏保存爲文件庫中的名稱，我只需在單元格D7中鍵入，而不用覆蓋原始文件 – user3045580

反正這樣做好嗎？ – user3045580

只需從上面的代碼中刪除'Range（「D7」）。Value =「walaoei」'行，然後執行前面評論中提到的內容。 –

將文件保存爲在新位置使用特定名稱的新版本

回答

相關問題