请教各位，Excel表格合并到一个工作簿中，能够批量改名吗？多个excel表格合并到一个工作簿

工作薄合并工作表批量重命名

一、同时打开两个工作簿在一个窗口显示，用鼠标拖住其中一个工作簿的标签（比如sheet 1）放到另一个工作簿的标签附近，松开鼠标就可以了。

二，打开两个工作簿，在要移动的工作标签上点右键，选择‘移动或复制工作表’，再选择另外一个工作薄……看提示操作就可以了。

多个工作薄以此类推。

可以右键先把一个工作簿的所有工作表全选了以后一起移动

方法一、打开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代码即可实现批量重命名工作表。

方法与步骤如下：

1、准备新的名字，对应相应的工作表，从A2单元格开始，A1存放标题

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

3、进入VBE对话框后，右击thisworkbook,选择插入，然后选择模块。

4、双击模块，进入代码输入框输入一下代码

Sub 重命名()

Dim i&

For i = 2 To Sheets.Count

Sheets(i).Name = Sheets(1).Cells(i, 1)

End Sub

也可以记住，下次直接粘贴即可，代码通用。

5、然后点击开发工具选项卡，在控件下面选择按钮控件（开发工具选项卡一般默认是没有的，具体可参考我前面的经验，有具体介绍如何调出）

6、在空白处，拖动鼠标，画出一个大小适合的按钮，然后右击选择制定宏。

7、选择重命名，然后点击确定。

8、最后点击按钮，看看效果吧，已经全部重命名。

工作表的名字可以随便改。

是不是单元格是没办法输入0301。用英文单引号再输入0301转换为文本型就行

或者选定这一列，格式/单元格/数值/选择文本