作者：乔山办公网日期：
返回目录：excel表格制作
亲，这个要用VBA编程。请告百知具体命名规则。
打开度你的Excel文件，按“Alt+F11”打开VBA编辑窗口，然后在左侧对应的Sheet上双击知，右侧空白处粘贴下面的代码。关闭道VBA窗口。然后按“Alt+F8”打开宏窗口，选择刚插入的宏，回点击“执行答”。
Sub cmm()
Dim i As Integer
For i = 1 To Sheets.Count
Debug.Print Sheets(i).Name '这一句更改为你的命名规则
Next
End Sub
方法一、打开excel表格，找到下面的工作表sheet1、sheet2、sheet3栏，选择要改名的工作表.比如sheet1，单击“格式→百工作表→重命名”命令.这时工作表的标签上名字将被反白显示.然后在度标签上输入新的表名即可。
问方法二、或者你直接双击工作表标签即可重新命名。注意我们在excel命名工作表命名规则答：不会区分英文大小写。
那么在excel中是版如何批量重命名工作表呢?
其实我们这里就需要VBA代码来进行实现。下面以一个简单的案例为例，比如我们工作表有几十个，现权在我要将这几十个工作表按目前的顺序重命名为1，2，3……，该输入VBA代码是什么?
SUB XXX()
DIM I
FOR I=1 TO SHEETS.COUNT
SHEETS(I).NAME=I
NEXT I
END SUB
输入以上VBA代码即可实现批量重命名工作表。
试试 ren 的批处理zhidao。大概思路就是。
ren "复件 123.pdf" "复 件 new123.pdf"
因为你的有子文件夹，专 在前面把路径加上。
对了关于获得路径和文件名， 你可以试下这个。
按住SHIFT右键你放PDF的大文件夹。选中“在此处打开命令窗口”。属在弹出的窗口内输入， “DIR /S /B >123.XLS”敲下回车， 文件名单就存在表格里面了。
首先进入DOS界面，获取目前的所有文件名。按Win+R启动“运行”，输入cmd，回车，打开7a686964616fe78988e69d83333DOS窗口。将当前的工作路径调整到图片所在文件夹（D:\mydoc）。输入D: 回车输入 cd mydoc 回车当前工作路径变为D:\mydoc
将d盘mydoc文件夹中所有的文件信息输出到文本文件name.txt。输入 dir > name.txt输出的name.txt文件默认保存在d:\mydoc里面。
将name.txt中需要改名的文件整理到excel中。
使用excel的分分列功能，将要改的文件名整理出。
选中A列--分列--分隔符号--空格--完成，删除无效信息。剩下的就是文件名了。在文件名前插入一列输入ren，在文件名后一列输入要修改成的文件名
将有效的3列复制到文本文件中。将列间的tab符号替换成空格（由于是从excel中复制过来的，列间的间隔不是空格，复制那个间隔（即tab）粘贴到“查找内容里”，“替换为”里面输入空格，点替换）。
将替换好的文件另存为ren.cmd文件，一定要将文件保存到d:\mydoc文件夹中。“文件名”输入：ren.cmd，"保存类型"选择 所有文件，点“保存”
在mydoc文件夹中双击ren.cmd文件，即执行了批量改名。