Excel 请问怎样用VBA重命名文件
作者&投稿：赖池 （若有异议请与网页底部的电邮联系）
name a & b as a & c
不改变原始表格数据，打印时自动添加打印日期。
1、首先我们打开一个工作样表作为例子。
2、我们使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：Sub rename()() Name "<工作簿路径>\<旧名称>.xls" As "<工作簿路径>\<新名称>.xls"End Sub。
3、我们知道在excel中保存一个文件为另一个文件时可以重新命名，save as 就是本例中as 代码的作用。name是命名函数，所以name as 就是将文件重命名。
4、不过需要注意的是，name改名修改的文件是未打开文件，如果是打开的文件直接运行代码的话，程序会报错。
5、文件的名称需要使用双引号包括起来，需要填写完整的路径和文件名称，包括文件的后缀名。大家需要注意文件的后缀名是需要通过系统设置来显示的。
6、最后，使用name重命名文件只要是符合未打开这一要素，就可以改名任何文件，包括但不限于excel的文件。当然后缀也可以修改，但是会以默认的关联程序打开。
Sub 修改文件名()
On Error Resume Next
原文件名 = "D:\成绩\高一第一学期成绩.xls"
新文件名 = "D:\成绩\高中学期成绩.xls"
Name 原文件名 As 新文件名
MsgBox "文件修改成功"
End Sub
'已测试通过'
'说明:本例是将D盘根目录下的 成绩文件夹中 的 高一第一学期成绩.xls名 修改成 高中学期成绩.xls.
'对于其它格式的文件同样适用'
拔宰整蛋： 1、首先打开一个工作样表作为例子. 2、使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:Sub rename() Name ＂<工作簿路径>\<旧名称>.xls＂ As ＂<工作簿路径>\<新名称>.xls＂End Sub. 3、在excel中...
兴平市15734422445： Excel 请帮助,怎么VBA批量更改文件名 - ？
拔宰整蛋： 附件 VBA 递归算法 批量提取 & 修改文件名 代码如下:点击选择文件夹 按钮 选择文件夹, 在C 列输入新文件名后, 点击 重命名按钮 批量重命名1234567891011121314151617181920212223242526272829303132333435363738394...
兴平市15734422445： excel 工作表标签批量改名 怎么操作? - ？
拔宰整蛋： 方法一、打开excel表格,找到下面的工作表sheet1、sheet2、sheet3栏,选择要改名的工作表.比如sheet1,单击“格式→工作表→重命名”命令.这时工作表的标签上名字将被反白显示.然后在标签上输入新的表名即可.方法二、或者你直接...
兴平市15734422445： VBA如何新建一个excel,并复制进去内容,并对sheet、excel进行命名? - ？
拔宰整蛋： 新建: Sheets.add 重命名:activesheet.name=＂文件名＂ 具体的你录一段宏,然后按alt+F11进去看一下代码.不过,录制的宏中的代码重命名是这样的.比如你将sheet1改为:文件1,它的代码为: Sheets(＂Sheet1＂).name=＂文件1＂, 我用activesheet,表示当前工作表.
兴平市15734422445： 如何用excel的VBA来修改工作表名称 - ？
拔宰整蛋： Sub test() For i = 1 To ThisWorkbook.Worksheets.Count Sheets(i).Name = Left(Sheets(i).Name, InStr(1, Sheets(i).Name, ＂【＂) - 1) Next End Sub 这个通过验证,可以实现了.
兴平市15734422445： VBA 如何修改Excel工作表的名称! - ？
拔宰整蛋： Sheets(＂Sheet1＂).Name=＂工作表1＂ Sheets(＂Sheet2＂).Name=＂工作表2＂ Sheets(＂Sheet3＂).Name=＂工作表3＂ 不明白可以再问
兴平市15734422445： 如何批量修改多张Excel表中的sheet名? - ？
拔宰整蛋： '近要求运行下面VBA代码. Sub ReNameSheet() Dim f Dim wb As Workbook '先在桌面建立一个名为EXCEL文件的文件夹,将要修改表名的EXCEL都放到这个文件夹中. f = Dir(＂c:\documents and settings\administrator\桌面\EXCEL文件\*.xls...
兴平市15734422445： 用vba新建的excel文档如何重命名两个sheet名 - ？
拔宰整蛋： sheets(1).name = ＂A＂ sheets(2).name = ＂B
兴平市15734422445： VBA 如何修改Excel工作表的名称! - ？
拔宰整蛋： 那是因为你的整个表格的名字里面有字符啦.你把你的表格的名字里的字符去掉了后.就不会出现上面的情况了啦.
兴平市15734422445： excel vba单元格命名 - ？
拔宰整蛋： 选中该区域,在左上角,即A列上面那个命名框输入名字,回车,OK
