Excel作为一个具有强大的数据处理的办公软件，对于白领一族来说，使用频率应该较高。在处理数据过程中，您是否碰到过清单之类汇总的情况，就是将同一个工作簿中的所有工作表的内容合并到一个工作表中。对于不会取巧的朋友，可能就是一个表一个表的复制，然后粘贴拼凑在一块，若碰到表格数量不多的情况，这种方法还好，若是碰到工作表数量庞大，例如50个工作表，100个工作表......这种方法就很鸡肋。今天本篇以Excel2013为例，教大家如何一键实现所有工作表合并到新工作表中，同样适用于Excel其他版本，碰到细微差异，可以适当调整代码。

教程将内容分成三部分：第一部分是新建一个汇总的工作表，并重新自定义命名；第二部分是逐一将各个工作表复制粘贴到汇总工作表中；第三部分为提示，即当合并工作完成后弹出提示。具体操作如下：

打开工作簿，在工作表标签中会显示包含的工作表名称，教程以下图中三个工作表为例，分别是Sheet1，Sheet2，Sheet3.按下组合键Alt+F11即可从Excel工作界面切换到VBA界面，在VBA窗口单击菜单栏中的插入，找到模块命令，单击该命令即可创建一个新的模块窗口，在模块窗口复制粘贴以下代码：

Sub Comb()

Dim i%

On Error Resume Next

Sheets(1).Select

Worksheets.Add '新建一个工作表

Sheets(1).Name = "汇总工作表" '对新建工作表重命名

For i = 2 To Sheets.Count 'For循环，遍历所有工作表

Sheets(i).Activate '激活工作表

Range("a1").Select

Selection.CurrentRegion.Select '选择活动工作表数据区域

Selection.Copy Destination:=Sheets(1).Range("a65536").End(xlUp).Offset(1) '粘贴到汇总工作中

Next

MsgBox ("工作表已全部合并到指定工作表中！") '弹窗提示合并完成

End Sub

1.快速选中全部工作表

右键单击工作窗口下面的工作表标签，在弹出的菜单中选择“选定全部工作表”命令即可（）。

2.快速启动Excel

如果想在启动系统自动运行Excel，可以这样操作: 1.双击“我的电脑”图标，进入Windows目录，依次打开“Start Menu\Programs\启动”文件夹; 2.打开Excel所在的文件夹，用鼠标将Excel图标拖到“启动”文件夹，这时Excel的快捷方式就被复制到“启动”文件夹中，下次启动Windows就可快速启动Excel了。 如果Windows系统已启动，你可用以下方法快速启动Excel: 方法一:单击“开始→文档”命令里的任一Excel工作簿即可。 方法二:用鼠标从“我的电脑”中将Excel应用程序拖到桌面上，然后从快捷菜单中选择“在当前位置创建快捷方式”，以后启动时只需双击快捷方式即可。

3.快速删除选定区域数据

如果用鼠标右键向上或向左(反向)拖动选定单元格区域的填充柄时，没有将其拖出选定区域即释放了鼠标右键，则将删除选定区域中的部分或全部数据(即拖动过程中变成灰色模糊的单元格区域，在释放了鼠标右键后其内容将被删除)。

4.给单元格重新命名

Excel给每个单元格都有一个默认的名字，其命名规则是列标加横标，例如D3表示第四列、第三行的单元格。如果要将某单元格重新命名，可以采用下面两种方法: 1.只要用鼠标单击某单元格，在表的左上角就会看到它当前的名字，再用鼠标选中名字，就可以输入一个新的名字了。 2.选中要命名的单元格，单击“插入→名称→定义”命令，显示“定义名称”对话框，在“在当前工作簿中的名称”框里输入名字，单击“确定”按钮即可（）。 注意:在给单元格命名时需注意名称的第一个字符必须是字母或汉字，它最多可包含255个字符，可以包含大、小写字符，但是名称中不能有空格且不能与单元格引用相同。

5.在Excel中选择整个单元格范围

在Excel中，如果想要快速选择正在处理的整个单元格范围，按下“Ctrl+Shift+ *”。 注意:该命令将选择整个列和列标题，而不是该列表周围的空白单元格——你将得到所需的单元格。这一技巧不同于全选命令，全选命令将选择工作表中的全部单元格，包括那些你不打算使用的单元格。

6.快速移动/复制单元格

先选定单元格，然后移动鼠标指针到单元格边框上，按下鼠标左键并拖动到新位置，然后释放按键即可移动。若要复制单元格，则在释放鼠标之前按下Ctrl即可。

7.快速修改单元格式次序

在拖放选定的一个或多个单元格至新位置的同时，按住Shift键可以快速修改单元格内容的次序。方法为:选定单元格，按下Shift键，移动鼠标指针至单元格边缘，直至出现拖放指针箭头，然后进行拖放操作。上下拖拉时鼠标在单元格间边界处会变成一个水平“工”状标志，左右拖拉时会变成垂直“工”状标志，释放鼠标按钮完成操作后，单元格间的次序即发生了变化。

8.彻底清除单元格内容

先选定单元格，然后按Delete键，这时仅删除了单元格内容，它的格式和批注还保留着。要彻底清除单元格，可用以下方法:选定想要清除的单元格或单元格范围，单击“编辑→清除”命令，这时显示“清除”菜单（），选择“全部”命令即可，当然你也可以选择删除“格式”、“内容”或“批注”中的任一个。

9.选择单元格

选择一个单元格，将鼠标指向它单击鼠标左键即可; 选择一个单元格区域，可选中左上角的单元格，然后按住鼠标左键向右拖曳，直到需要的位置松开鼠标左键即可; 若要选择两个或多个不相邻的单元格区域，在选择一个单元格区域后，可按住Ctrl键，然后再选另一个区域即可; 若要选择整行或整列，只需单击行号或列标，这时该行或该列第一个单元格将成为活动的单元格; 若单击左上角行号与列标交叉处的按钮，即可选定整个工作表。

10.为工作表命名

为了便于记忆和查找，可以将Excel的sheet1、sheet2、sheet3工作命名为容易记忆的名字，有两种方法:1.选择要改名的工作表，单击“格式→工作表→重命名”命令，这时工作表的标签上名字将被反白显示，然后在标签上输入新的表名即可。 2.双击当前工作表下部的名称，如“Sheet1”，再输入新的名称。

11.一次性打开多个工作簿

利用下面的方法可以快速打开多个工作簿: 方法一 打开工作簿(*.xls)所在的文件夹，按住Shift键或Ctrl键，并用鼠标选择彼此相邻或不相邻的多个工作簿，将它们全部选中，然后按右键单击，选择“打开”命令，系统则启动Excel ，并将上述选中的工作簿全部打开。 方法二 将需要一次打开的多个工作簿文件复制到C:\Windows\Application Data\Microsoft\Excel\XLSTART文件夹中，以后启动Excel 时，上述工作簿也同时被全部打开。 方法三 启动Excel ，单击“工具→选项”命令，打开“选项”对话框，点击“常规”标签，在“启动时打开此项中的所有文件”后面的方框中输入一个文件夹的完整路径(如d:\Excel)，单击“确定”退出。然后将需要同时打开的工作簿复制到上述文件夹中，以后当启动Excel 时，上述文件夹中的所有文件(包括非Excel格式的文档)被全部打开。 方法四 在Excel 中，单击“文件→打开”命令，按住Shift键或Ctrl键，在弹出的对话框文件列表中选择彼此相邻或不相邻的多个工作簿，然后按“打开”按钮，就可以一次打开多个工作簿。 方法五 用上述方法，将需要同时打开的多个工作簿全部打开，再单击“文件→保存工作区”命令，打开“保存工作区”对话框，取名保存。以后只要用Excel 打开该工作区文件，则包含在该工作区中的所有工作簿即被同时打开。

12.快速切换工作簿

对于少量的工作簿切换，单击工作簿所在窗口即可。要对多个窗口下的多个工作簿进行切换，可以使用“窗口”菜单。“窗口”菜单的底部列出了已打开工作簿的名字，要直接切换到一个工作簿，可以从“窗口”菜单选择它的名字。“窗口”菜单最多能列出9个工作簿，若多于9个，“窗口”菜单则包含一个名为“其他窗口”的命令，选用该命令，则出现一个按字母顺序列出所有已打开的工作簿名字的对话框，只需单击其中需要的名字即可。

13.选定超级链接文本

如果需要在Excel中选定超级链接文本而不跳转到目标处，可在指向该单元格时，单击并按住可选定单元格。

14.快速查找

在执行查找操作之前，可以将查找区域确定在某个单元格区域、整个工作表（可选定此工作表内的任意一个单元格）或者工作簿里的多个工作表范围内。在输入查找内容时，可以使用问号（？）和星号（*）作为通配符，以方便查找操作。问号（？）代表一个字符，星号（*）代表一个或多个字符。需要注意的问题是，既然问号（？）和星号（*）作为通配符使用，那么如何查找问号（？）和星号（*）呢？只要在这两个字符前加上波浪号(～)就可以了。

15.修改默认文件保存路径

启动Excel ，单击“工具→选项”命令，打开“选项”对话框，在“常规”标签中，将“默认文件位置”方框中的内容修改为你需要定位的文件夹完整路径()。以后新建Excel工作簿，进行“保存”操作时，系统打开“另存为”对话框后直接定位到你指定的文件夹中。

16.指定打开的文件夹

我们可以指定打开文件的文件夹，方法如下: 单击“开始→运行”，输入regedit命令，打开“注册表编辑器”，展开HKEY_CURRENT_USER\Software\Microsoft\ Office\10.0\Common\Open Find\Places\UserDefinedPlaces，在下面新建主键，名称为“mydoc”，然后在该主键中新建两个“字符串值”，名称分别是“Name”和“Path”，值分别为“我的文件”(可以随意命名)和“d:\mypath”(定位文件夹的完整路径)，关闭“注册表编辑器”，重启电脑。以后在Excel 中进行“打开”操作时，打开对话框左侧新添了“我的文件”这一项目，点击该项目，即可进入“d:\mypath”文件夹。

17.在多个Excel工作簿间快速切换

按下“Ctrl+Tab”可在打开的工作簿间切换。

18.快速获取帮助

对于工具栏或屏幕区，按组合键“Shift＋F1”，鼠标变成带问号的箭头，用鼠标单击工具栏按钮或屏幕区，它就弹出一个帮助窗口会显示该元素的详细帮助信息。

19.创建帮助文件的快捷方式

Excel帮助文件是编译的HTML帮助文件Xlmain10.chm，存放在安装目录\Office10\2052目录中，单击并拖拉此文件到Windows快速启动工具栏上。此后，不管Excel是否在运行，而且也不用调用Office助手，单击Windows快速启动工具栏上的这个图标将引出Excel帮助。

20.双击单元格某边移动选定单元格

在工作表内移动选定单元格有一种快捷方法:将鼠标指针放置于选定单元格的一边，注意要选择与移动方向相关的一边，即要向下移动，就将鼠标指针放置于单元格的底部;如果要向右移动，就将鼠标指针放置于单元格的右边;以此类推。这时鼠标指针变为白色箭头的形状，双击选择单元格的某边，鼠标指针将沿选定的方向移动到特定的单元格中。如果此方向相邻单元格为空白单元格，则将移动到连续最远的空白单元格中;如果此方向相邻单元格为非空白单元格，则将移动到连续最远的非空白单元格中。

我们在使用表格的时候，不仅会复制和移动单元格，很多时候也会直接借用原有的工作表。一般你会怎么做呢？全选-复制-新建工作表-切换到新表-粘贴？？？有没有稍稍觉得操作起来有点麻烦？有的时候复制粘贴不好原有的格式又变动了，还需要再次去调整格式。小编今天和大家一起学习如何快速复制工作表。

一、鼠标拖动复制工作表

这个方法不限于是否在同一工作薄中。点击并选中目标工作表标签，同时按住组合键【Ctrl】和鼠标左键，并拖动鼠标至目标位置，即可获得所选的工作表复制表。若在同一工作簿，工作表标签被重新命名，如在不同的工作簿，且未重名的情况下，工作表标签将被沿用。

二、功能区命令法

选择目标工作表，切换到【开始】选项卡，在【单元格】组中，点击【格式】按钮，在弹出的列表中选择【移动或复制工作表】按钮。此时，弹出【移动和复制工作表】对话框，在【将选定工作表移至工作簿】选项中，选择需要移动到的目标工作薄。在【下列选定工作表之前】设定被粘贴工作表在工作薄中出现的位置，同时勾选【建立副本】，单击【确定】按钮即可。

欢迎关注，以上。

工作中常常会遇到一些特殊情况，一个Excel工作簿中可能会有几十，或者上百个工作表。

这么多工作表存在一个Excel表中，该如何快速定位到特定的表格呢？如果能有一个工作表目录真是太方便了！

最常见的方法，要定义名称 + 长长的让人很难记住的Excel公式。制作这个目录对新手还是有点难度。

定义名称：Shname =MID(GET.WORKBOOK(1),FIND("]",GET.WORKBOOK(1))+1,99)&T(NOW())在目录表中任一单元格输入并复制以下公式=IFERROR(HYPERLINK("#'"&INDEX(Shname,ROW(A1))&"'!A1",INDEX(Shname,ROW(A1))),"")

这里分享一个非常简单的Excel目录制作方法（适合2003以上版本）

操作步骤：

1、输入公式

全选所有表，在前面添加一空列。然后在单元格A1中输入公式 =xfd1

注：这个方法的原理是输入让03版无法兼容的公式（03版没有XFD列），然后检查功能诱使Excel把所有工作表名列出来。

2、生成超链接列表

文件 - 信息 - 检查兼容性 - 复制到工作表，然后Excel会插入一个内容检查的工作表，并且在E列已自动生成带链接的工作表名称。

3、制作目录表

把带链接的工作表名称列表粘贴到“主界面”工作表中，替换掉'!A1，稍美化一下，目录效果如下：

4、制作返回主界面的链接

全选工作表 - 在任一个表的A1输入公式（会同时输入到所有表中）

=HYPERLINK("#主界面!A1","返回主界面")

注:HYPERLINK函数可以在Excel中用公式生成超链接

完工！如果以后新增了表格，手工添加校新表超链接也不麻烦，如果想完全自动，可以使用本文开头所介绍的使用宏表函数创建目录。

工作中常常会遇到一个工作簿中有很多的工作表，如果要求改每个工作表名称的话将是一件非常耗时的事情，你需要一个一个点击去重命名，输入新名称，遇到这样的问题大家常常是不知所措。今天由我来给大家分享一种快速高效的批量命名工作表的方法。

具体操作步骤

第一步：新建工作表。打开需要重命名工作表名称的工作簿，在其所有工作表最前mai面新建一张空白空白工作表，将其命名为表格批量重命名。

第二步：查看VBA代码。 用鼠标右键单击“表格批量重命名”工作表名称，在弹出的菜单中选择“查看代码”，之后就会打开代码编辑器，也可直接按下组合键Alt+F11来打开代码编辑窗口。

第三步：填写提取工作表名称代码和运行代码。在打开的VB代码编辑窗口中，选择插入的模块，把下面的代码复制粘贴到模块中，再点击开始运行代码，然后最小化代码窗口。

Public Sub 获取各工作表的名称()

For i = 1 To Worksheets.Count

Sheets("工作表批量重命名s(i, 1).Value = Worksheets(i).Name

Next

End Sub

第四步：提取工作表名称。运行代码后，就会发现工作表批量重命名工作表中会提取出所有工作表的名称（如下图）；

第五步：输入修改后的名称。在B列对应输入修改后的名称（如下图）；

第六步：填写重命名代码和运行代码。打开VB代码编辑窗口，再一次选择插入新的模块，把“更改名称”代码复制粘贴到模块中，再点击开始运行代码，然后最小化代码窗口。

Public Sub 更改名称()

For i = 2 To Worksheets.Count

Worksheets(i).Name = Worksheets("工作表批量重命名").Cells(i, 2).Value

Next

End Sub

第七步，表格批量重命名。点击运行后机会发现已将工作表名称重名命名为B列名称（如下图）

工作表批量重命名到此就重命名结束了，在我看来这种方法还是蛮实用的，有次我重命名300多张工作表，几分钟就搞定了，我们只需复制代码，稍微修改一下就可以达到重命名的效果，要不赶快去试一下吧！

如有不懂之处，欢迎留言讨论！

期待你的关注和转发分享，更多精彩内容在持续更新中.............

往期精彩文章：

要想学好excel，这几个技巧不得不掌握！

Excel插件：快速制作属于自己的Excel插件，建立批量操作工具箱！

在Excel中，你可以给一个单元格，或者单元格区域起一个名称，一个可以代表业务含义的容易被识别的名称，而不仅仅是A1、B2:D5这样的默认名称。

先来个简单的示例：

上图中两个公式都可以得到总金额，但显然“=SUM(销售金额)”的形式，从业务角度更易理解，特别是当你在以后回顾表格，或者将表格发布给同事时，这种形式显然更加直观易读。

如何定义名称

1、使用名称框：

选中需要命名的单元格或区域，在名称框中输入名称，确认即可。

通过名称框的下拉按钮，可以选择到定义的名称，对应的数据区域将高亮显示出来。

另外，按住Ctrl键，选择不连续的数据区域，也是可以将其定义为一个名称的。

2、使用名称管理器：

切换到【公式】功能页签，点击“定义的名称”组中的“名称管理器”功能按钮，可以打开“名称管理器”维护窗口，点击“新建”按钮，在“名称”文本框中输入带有业务含义的名称，将“引用位置”设置为对应的数据区域。

Ctrl+F3快捷键可以直接打开名称管理器。

使用“定义的名称”组中的“定义名称”，可以直接进入新建名称窗口。

在“名称管理器”窗口中，光标定位到名称的“引用位置”时，可以看到对应的数据区域有一圈绿色的虚线外边框，通过这个，可以看出定义的名称是否正确。

在“名称管理器”中可以对名称进行修改、删除，但要注意：删除名称是无法使用Ctrl+Z恢复的！

公式编辑时使用名称

当我们定义了名称后，在公式中可以直接输入名称，并且Excel的语法屏幕提示会自动显示出匹配的名称清单以供选择，位于函数提示的上方，使用方向键加TAB键就可以切换选中需要的名称，而不用输入名称的全部字符。（中文命名的语法屏幕提示要在删除字符时才能出现）

下图中，我已经将区域D3:D10命名为sales，当在“=SUM(”之后输入s，即出现了相应的屏幕提示了：

名称的范围

定义名称时，默认范围为工作簿，可以选择设置成工作表范围的名称。

名称范围应用的规则：

1、可以在工作簿内的任何工作表中直接使用工作簿范围的名称。

2、当名称设置为某个工作表范围时，该工作簿内的其他工作表引用该名称时，需要使用跨表引用的方式：“工作表名+半角感叹号+名称”，比如：=SUM(sheet1!销售金额)。

3、对于工作簿范围的名称，还可以跨工作簿使用名称，引用方式：“工作簿名+半角感叹号+名称”，比如：=SUM(销售订单!销售金额)。

4、对于工作表范围的名称，也可以跨工作簿使用，引用方式：“[工作簿名]+工作表名+半角感叹号+名称”，比如：=SUM([销售订单]sheet1!销售金额)。

动态名称区域

上图中，要统计各销售员的总销售金额，当前的公式为：=SUMIF(C2:C20,I2,G2:G20)，但若新增了销售数据，就不得不重新编辑这些公式了。

但是，使用动态名称区域就不一样了！

无论增加或修改多少销售数据，右侧的总销售金额公式始终不变，就能自动完成统计。

J2单元格公式：=SUMIF(SalesPerson,I2,SalesAmt)

这里的SalesPerson和SalesAmt就是定义的两个动态名称区域：

SalesPerson：=Sheet2!$C$2:OFFSET(Sheet2!$C$1,COUNTA(Sheet2!$C$2:$C$1000),,1)

SalesAmt：=Sheet2!$G$2:OFFSET(Sheet2!$G$1,COUNTA(Sheet2!$G$2:$G$1000),,1)

两个名称的引用位置公式设置原理相同，我们以SalesPerson为例进行公式解释：

1、"Sheet2!$C$2:"部分：表示引用位置从Sheet2工作表的C2单元格开始；

2、"COUNTA(Sheet2!$C$2:$C$1000)"部分：使用COUNTA函数返回Sheet2工作表C2:C1000区域内，包含有数据的单元格的总数量。

3、OFFSET部分：使用OFFSET结合COUNTA函数返回Sheet2工作表C2:C1000区域内最后一个包含数据的单元格，以构造SalesPerson名称的引用位置为从C2到C列最后一个有数据的单元格所构成的动态区域。

注意：

1、这里的1000是考虑可能包含销售数据的最大行数，若实际数据可能要更大，则只需将这个数值调大即可。

2、维护销售数据时，中间不能有空行，否则COUNTA函数不会计算这些空行，将导致统计结果出错。

3、这个示例仅仅是一个简单的动态名称区域的应用，实际上，在名称的引用位置中使用函数公式，可以创造出很多的动态名称效果，如创建动态数据源的透视图表、动态的下拉清单等。

OK，这次就先浅谈到这里吧，Excel的名称实际上真是一个很大的话题，它的应用也很广泛，下次再继续聊一聊关于名称的其他方面，比如常量名称、相对名称区域等等。

本文版权归Excellive所有，更多Excel好文和示例下载，请关注Excellive！喜欢的话就请点赞、收藏、分享吧！如果您有问题或建议，欢迎留言与大家一起分享！

▲【EXCEL小学堂】分享办公软件小技巧

▲屏幕右上角点【关注】，跟着小E君一起进步

创建好工作表后，往往还要对工作表进行重命名、复制、移动、删除等操作，以使其符合用户的需求，下面将对这些常见的编辑操作进行介绍。

一、重命名工作表

当工作表比较多时，根据需要可对工作表进行重新命名。常用以下两种方法：

（1）选中要重命名的工作表。选择“格式”→“工作表”→“重命名”命令，直接输入新的工作表名称并按回车键即可。

（2）在要重命名的工作表标签上单击鼠标右键，从弹出的快捷菜单中选择“重命名”命令即可。

二、选中工作表

对工作表进行各种编辑操作前，必须先将目标工作表选中，然后才能进行其他相关操作。在Excel 2003中，用户可以使用以下4种方法选中工作表。

（1）单击工作表标签，即可选中该标签对应的工作表。

（2）按住“Shift”键的同时单击两个工作表标签，可选中这两个工作表之间的所有工作表。

（3）按住“Ctrl”键的同时依次单击多个工作表标签，可选中多个不连续的工作表。

（4）在工作表标签上单击鼠标右键，从弹出的快捷菜单中选择“选定全部工作表”命令，即可选中工作簿中的所有工作表。

三、复制和移动工作表

在Excel 2003中，用户既可以在同一个工作簿中复制和移动工作表，也可以在不同的工作簿之间复制和移动工作表。

1．在同一个工作簿中复制和移动

在同一个工作簿中复制和移动工作表的具体操作步骤：

（1）用鼠标左键单击要移动工作表的标签，按住鼠标左键并拖动鼠标，即可移动该工作表的位置。

（2）按住“Ctrl”键的同时移动工作表，即可在移动工作表的同时复制该工作表。

2．在不同工作簿间复制和移动

在不同工作簿间复制和移动工作表的具体操作步骤：

（1）用鼠标右键单击要复制或移动的工作表，在弹出的快捷菜单中选择“移动或复制工作表”命令，弹出“移动或复制工作表”对话框，如下图：

（2）在下拉列表框中选择目标工作簿，选中“建立副本”复选框，单击“确定”按钮，即可在移动的同时完成工作表的复制工作。

（3）如果取消选中“建立副本”复选框，可在不同工作簿间只移动工作表。

四、删除工作表

当工作簿中的工作表不再使用时，可将其删除。用户可以使用以下两种方法删除工作表，具体操作步骤如下：

（1）在工作表标签上单击鼠标右键，从弹出的快捷菜单中选择“删除”命令即可。

（2）选中要删除的工作表标签，选择“编辑”→“删除工作表”命令即可。

提示：如果用户删除的工作表中包含有数据，则会弹出如图所示的提示框，提示用户是否真的要删除该工作表。如果确定删除，单击“删除”按钮即可。

小E后记：

谢谢你长得这么好看还来看我的文章。希望小E的文章能够给您带来更多的欢乐，喜欢的话可以在下方点赞哦~点赞是一种鼓励，转发是一种传递。喜欢这篇文章吗？喜欢的话可以关注一下【Excel小学堂】，不喜欢的可以在评论区心情吐槽啦！虚心接受~

在使用Excel表格过程中，我们会发现一个工作簿中可以包含多个工作表，仅03版就有能创建二百多个（具体数值是255），在往上的高版本更是可以创建数量惊人的工作表格，数量能够达到上万。对于如此多的工作表格，如何只是新建工作表，我们可以设置默认工作簿包含几个工作表设置来简单实现。但是如果需要对这么多的工作表标签指定命名，若我们还是用这种常规的命名方式（双击改名），那真是会把人的累的虚脱。今天本教程就教大家如何根据指定单元格内容，以工作表名方式批量创建工作表技巧。感兴趣的朋友，赶紧来看看吧！

1、首先是创建工作表名称：这个可以自己输入，也可以复制粘贴，也可以导入文本。不管你用什么方式创建，反正只要是合法字符的名称即可。教程以Excel为例，创建工作表的名称如下，A1单元格为创建表格标题，从A2到A20单元格均为需要创建工作表的名称。

2、代码汇编：在Excel界面按下组合键Alt+F11快速调出VBA窗口；在VBA界面中单击菜单栏插入，然后选择模块命令；此时会弹出一个模块窗口，在模块窗口复制粘贴以下代码（最好是将输入法切换至中文输入法模式下复制粘贴）：

Sub 批量生成指定名称工作表()

Dim i%, j%, k%

i = Application.CountA(Range("a2:a20"))

For j = 2 To i Step 1

Sheets.Add after:=Sheets(Sheets.Count)

k = Worksheets.Count

Sheets(k).Select

Sheets(k).Name = Sheets(1).Cells(j, 1).Value

Next

End Sub

3、结果显示：将鼠标光标定位在这段代码当中，然后按下F5键运行该段代码程序（或单击菜单栏中的运行，然后选择运行子程序命令，如上图所示）。待代码运行完毕，按下Alt+F11关闭VBA窗口，返回Excel工作界面查看结果，发现已经按照我们的要求批量生产了一堆工作表。

excel工作簿快速提取各个工作表名称的方法：

1.定义名称“获取表名”,在“插入”菜单下点击“名称”下的“定义”。

2.名称定义为get ,可以随便设置，在下方输入函数“=get.workbook(1)”。

3.在单元格中，选择多个单元格，输入公式=transpose(get),然后按ctrl+shift+enter三键输入数组计算。

4.可以看到，工作表名称是获得了，但前面的前缀还要删除掉。选择所有的工作表名称，ctrl+c，再右击，在弹出的菜单中选择“选择性粘贴”。

5.在“选择性粘贴”窗口中选择“数值”后点击“确定”按钮。

6.在“数据”菜单下选择“分列”。

7.在“分列”窗口中我们选择“固定宽度”。

8.如图将做分隔线定位在工作表前。

9.点击下一步骤，选择“不导入此列（跳过），最后点击”确定按钮。这个时候就可以提取出所有工作表的名称了。

（本文内容由百度知道网友雷筱轩33贡献）

部分同学有时会遇到这种问题——在空白的Excel表中一下子需要建立很多的工作表，最好是名称也能一下子记录好，而不是自己一个个去重命名。

有位同学说，老师，我这样重命名下来，累也累死了！

这个操作应该还是有部分同学知道并用过的——就是使用数据透视表来做！

插入——数据透视表

选中我们需要插入的工作表名称——勾选“现有工作表”——选中C1（当然其他的单元格也可以）

这是我们出来的透视表——勾选“带插入工作表名称”——拉到“筛选器”中——关闭

分析——选项——显示报表筛选项

确定

好了

咱们还是美化下，这样看的也清楚！（右键“工作表标签颜色”可以设置哦！）

今天的知识，你学会了吗？哪里不明白的请在讨论区提问哦！

更多Excel学习和问题交流请加群！558669700

当然你有更好的方法也可以在讨论区分享给我们

【剧透：下个知识点——批量设置工作表格式】

如何在Excel多个工作表中批量建立下拉菜单：看前面的文章哦！