怎么把excel批量改名称了

1.如何批量更改excel表格名称

方法/步骤首先，我们来准备新的名字，对应相应的工作表，从A2单元格开始，A1存放标题字段。

新名字全部准备好后，然后任意工作表标签右击，点击查看代码，或者ALT+F 11快捷键，调出VBE对话框。进入VBE对话框后，右击thisworkbook，选择插入，然后选择模块。

双击模块，进入代码输入框输入一下代码Sub 重命名（）Dim i&For i = 2 To Sheets.CountSheets(i).Name = Sheets(1).Cells(i, 1)NextEnd Sub也可以记住，下次直接粘贴即可，代码通用。然后点击开发工具选项卡，在控件下面选择按钮控件（开发工具选项卡一般默认是没有的，具体可参考我前面的经验，有具体介绍如何调出）在空白处，拖动鼠标，画出一个大小适合的按钮，然后右击选择制定宏。

选择重命名，然后点击确定。最后点击按钮，看看效果吧，已经全部重命名。

OK！小伙伴们，你们学会了吗？。

2.如何批量修改excel文件名称

1、先启动电脑上的Excel，我跟大家举例演示，就随便创建了一个比较简单的表格，在C2单元格输入公式：="ren "&A2&".jpg "&B2&".jpg"，这是一个字符链接公式，表示将A2单元格的内容重命名为B2单元格的内容，回车得到结果，然后单元格填充完整个表格。

2、复制C列中的内容，不包括标题，粘贴到一个记事本中，保存类型选为所有类型，然后另存为bat文件。

3、将bat文件放到与需要替换名称的文件，同一文件夹之内，双击执行即可。

3.如何用excel给文件批量重命名

原来文件名称复制到A2以下单元，再将新文件名称录入到B2以下单元，执行宏：

Sub 批量修改文件名（）

a = [a:a].Find("*", , xlValues, , , 2).Row 'A列最后可见单元的行号

For b = 2 To a

c = Range("a" & b).Value

cc = Range("b" & b).Value

Name "e：\图片\" & c As "e：\图片\" & cc

Next

End Sub

请注意修改使用上述代码中的文件路径。

4.Excel如何批量改表名

在某个区域内写好对应的新旧表名，比如a1:b3

Sub rename()

Dim anames() As Variant

Dim i As Long

'a1:b3是现在的表名与要改成的表名的区域

anames = Range("a1:b3")

For i = LBound(anames) To UBound(anames)

Sheets(anames(i, 1)).Name = anames(i, 2)

Next i

End Sub

5.如何用EXCEL中的数据给文件批量重命名

用批处理文件比较好 在EXCEL中，假设A列存照片名，B列存工号，C列存姓名 1、E1公式，=B1&C1&".jpg" 2、F1公式，="rename "&A1&" "& E1 3、下拉二公式 4、将F列COPY到文本文件中 5、将上述文本文件另存为.BAT文件（如ABC.BAT），需要将该文件存在有照片的目录下。

6、运行该文件即可。 如果照片名是连续的，比较好，输入一个就可以了，但是如果不连续，需要在DOS命令下，用 dir *.jpg >A1.txt， 然后用EXCEL打开，处理一下就可以了。

回答你的补充提问：你的质疑很好，在原来的DOS命令下是这样的。如果你在windows XP 下：开始->运行 输入：CMD，就进入了仿真DOS状态。

在这里是可以用长文件名的，不局限于8.3了。你可以试试。

所以基于windows XP 下的DOS是可以用批处理完成上述要求的。

6.批量替换excel sheet名称

只能用宏了

Sub rep()

Dim fid, rep, st

fid = InputBox（"替换前："）

rep = InputBox（"替换后："）

For Each st In Worksheets

If st.Name Like fid & "*" Then

st.Name = Replace(st.Name, fid, rep)

End If

Next

End Sub替换前输入12

替换后输入1

适用其他情况，根据自己需要输入。