如何用VBA快速批量提取多个工作表名称？

工作中，我们有时会需要将多个工作表Sheet的名称提取出来，制作成一个目录
如果一个一个去复制粘贴，效率肯定是很低的，如果Sheet数量很多，会严重影响我们的工作进度，那该如何处理呢？

我们可以用VBA的方法快速处理

步骤：

Step1: 首先调出【开发工具】选项卡，单击【文件】选项卡-【选项】-【自定义功能区】，在主选项卡中，把【开发工具】前面的“√”选上，然后确定即可

Step2：单击【开发工具】选项卡，在“代码”选项组中选择“Visual Basic”，弹出【模块代码】编辑框，选择Microsoft Excel 对象，然后单击【插入】选项卡，选择【模块】，然后把写好的宏放在右边的编辑框里，然后把代码编辑框关掉

VBA代码如下：

Sub 提取工作表名称()
Dim i!
Cells(1, 1).Value = “表名”
For i = 1 To Sheets.Count
Cells(i + 1, 1).Value = Sheets(i).Name
Next i
End Sub

Step3：单击Excel中的【插入】选项卡，单击【形状】按钮，随便选择一个文本框，然后输入文字，单击文本框，鼠标右键，选择【指定宏】选项，选择刚才编辑的宏，然后确定即可，当我们单击“提取工作表的名称”按钮时，在A列就会看到每个表的名称都提取出来了

不会VBA也可以快速提取
欢迎关注和转发

END

如何用VBA快速批量提取多个工作表名称？相关推荐

vba 指定列后插入列_如何用【VBA】快速批量提取多个工作表名称？
工作中,我们有时会需要将多个工作表Sheet的名称提取出来,制作成一个目录,如果一个一个去复制粘贴,效率肯定是很低的,如果Sheet数量很多,会严重影响我们的工作进度,那该如何处理呢? 使用VBA快速 ...
vba 修改access表的链接地址_神奇的VBA编程：禁止修改Excel工作表名称
职场中经常需要将做好的Excel表格/模板发给他人或者存放在公共路径上共享使用,此时需要禁止别人更改已经设定好的工作表名称.或者某些工作簿中有公式使用了对某些工作表的外部引用,如果工作表名称发生变化, ...
【Excel VBA】批量新建并重命名工作表
一.需求根据sheet1所列名称,添加并重命名新的工作表. 二.实现 1.按照从前往后的顺序 Sub cre_ren_sheets()Dim num% /* 定义为integer*/num = Ap ...
Excel VBA 根据单元格内容更改工作表名称
Public Sub 更改名称()For i = 2 To Worksheets.CountWorksheets(i).Name = Worksheets("目录").Cells( ...
「Excel技巧」Excel批量提取当前工作簿下的所有工作表名称
摘自:「Excel技巧」Excel批量提取当前工作簿下的所有工作表名称 (baidu.com) 一个工作簿里有很多工作表,想要提取当前工作簿的所有工作表名称,你会怎么操作? 过去的我,可能会一个个手动 ...
Excel实用技巧-如何批量提取excel工作表名称
Excel实用技巧-如何批量提取excel工作表名称 1. 打开Excel文件,点击"公式"栏,进而点击"定义管理器" 2. 在弹出的对话框中,点击新增按钮, ...
如何批量提取文件名到excel表
如何批量提取文件名到excel表?前段时间有个粉丝向我求助,他遇到一个棘手的工作,需要将大量文件的名称提取出来,放到excel表格里然后整理.但是问文件数量太多了,不知道如何一次性将文件名提取到exc ...
vba批量合并指定的sheet_Excel通用VBA代码一键合并多个工作表至总表！
原标题:Excel通用VBA代码一键合并多个工作表至总表! 一个工作簿中会有很多个相同格式,标题行内容和顺序都一样的工作表,我们想把这个工作表中的数据全部放至一个总表数据中. 图片上示例是3个工作表, ...
批量提取、修改excel文件名称
批量提取.修改excel文件名称一批量提取excel文件名称首先,在文档所在目录下用记事本建立一个空文本,存为文件名LS.BAT(注意扩展名不能是TXT,要改成BAT).然后在里边输入如下一行简 ...

如何用VBA快速批量提取多个工作表名称？

如何用VBA快速批量提取多个工作表名称？相关推荐

最新文章

热门文章