如何在vba中重命名工作簿?
要重命名计算机上存储的 Excel 文件,必须使用“NAME”指令。在此语句中,您需要定义旧文件名和要应用的新名称。但有一件事你必须记住,文件必须关闭。
这里,我有一个 Excel 文件,该文件存储在桌面上的“Data”文件夹中,并且在“SampleFile”文件夹中,我想将其重命名为“myFile”,其代码如下。
Name "C:\Users\Dell\Desktop\myFolder\SampleFile.xlsx" As _ "C:\Users\Dell\Desktop\myFolder\myNewFile.xlsx"
使用 VBA 重命名 Excel 文件的步骤
现在我们来详细理解这行代码。
- 您应该用来启动代码的名称声明。
- 具有旧名称和文件扩展名的文件地址。
- “喜欢”指的是新名字。
- 具有新名称和文件扩展名的文件地址。
有用的链接:运行宏–宏记录器– Visual Basic 编辑器–个人宏手册
为了使名称状态更清晰一些,您可以使用变量,就像下面的代码一样。
Sub vba_rename_workbook() Dim oldName As String Dim newName As String oldName = "C:\Users\Dell\Desktop\myFolder\SampleFile.xlsx" newName = "C:\Users\Dell\Desktop\myFolder\myNewFile.xlsx" Name oldName As newName End Sub