1、举例：假设你想将当前工作簿文件保存到本地，并且想以某个单元格的值作为保存文件名。例如，Cell A1的值是testWork，您希望将工作簿保存为testWork的名称。
2、步骤1：打开您的Excel工作簿，然后单击开发工具选项卡下的“Visual Basic”命令，或者只需按“ALT + F11”快捷方式。
3、步骤2：然后将出现“Visual Basic编辑器”窗口。
4、步骤3：单击“插入” – >“模块”以创建新模块。
5、步骤4：将以下VBA代码粘贴到代码窗口中。然后单击“保存”按钮。
代码：
Sub FileNameAsCellContent()Dim FileName As StringDim Path As StringApplication.DisplayAlerts = FalsePath = "C:\test\"FileName = Range("A1").Value & ".xlsx"ActiveWorkbook.SaveAs Path & FileName, xlOpenXMLWorkbookApplication.DisplayAlerts = TrueActiveWorkbook.CloseEnd Sub
6、步骤5：返回当前工作表，然后运行上面的excel宏。点击执行按钮。
7、步骤6：让我们看看结果：
