1、举例:假设你想将当前工作簿文件错聂庋堀保存到本地,并且想以某个单元格的值作为保存文件名。例如,Cell A1的值是testWork,您希望将工作簿保存为testWork的名称。
2、步骤1:打开您的Excel工作簿,然后单击开发工具选项卡下的“Visual Basic”命令,或者只需按“ALT + F11”快捷方式。

4、步骤3:单击“插入” – >“模块”以创建新模块。

5、步骤4:将以下VBA代码粘贴到代码窗口中。然后单击“保存”按钮。代码:Sub FileNameAsCellContent() Dim FileName As String Dim Path As String Application.DisplayAlerts = False Path = "C:\test\" FileName = Range("A1").Value & ".xlsx" ActiveWorkbook.SaveAs Path & FileName, xlOpenXMLWorkbook Application.DisplayAlerts = True ActiveWorkbook.Close End Sub
