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

你学会了吗？

欢迎关注和转发

vba 指定列后插入列_如何用【VBA】快速批量提取多个工作表名称？相关推荐

如何用VBA快速批量提取多个工作表名称？
工作中,我们有时会需要将多个工作表Sheet的名称提取出来,制作成一个目录如果一个一个去复制粘贴,效率肯定是很低的,如果Sheet数量很多,会严重影响我们的工作进度,那该如何处理呢? 我们可以用VB ...
vba 指定列后插入列_在不同的列左侧插入指定数量的空白列
任务: 在不同的列左侧插入指定数量的空白列(本例是要求在每列左侧插入第2行数字对应的空白列) 插入空白列前插入空白列后 vba代码如下: Sub 在不同的列左侧插入指定数量的空白列() Dim m, ...
vba 指定列后插入列_Excle中的VBA介绍分享
SunYoung 1.什么是VBA Visual Basic for Applications(VBA)是Visual Basic的一种宏语言,它能使常用的程序自动化,是针对Office开发的一种 ...
vba 指定列后插入列_Vba代码插入指定数量的空白行
任务: 在不同的行下面插入指定数量的空白行(本例是要求在每行下面插入B列数字对应的空白行) 插入空白行前插入空白行后 vba代码如下: Sub Macro5() Dim m, n, i As Int ...
3文件提取器_奇淫巧技 | 快速批量提取 PPT 中所有图片素材方法
办公少不了会用到 PPT 幻灯片,今天有小伙伴问雷锋哥如何把所有 PPT 中的图片素材快速提取保存出来,人工一个一个保存,效率太低了.一开始想找看有没有提取的工具,后来发现一个小技巧很轻松就能批量提取 ...
vba 修改access表的链接地址_神奇的VBA编程：禁止修改Excel工作表名称
职场中经常需要将做好的Excel表格/模板发给他人或者存放在公共路径上共享使用,此时需要禁止别人更改已经设定好的工作表名称.或者某些工作簿中有公式使用了对某些工作表的外部引用,如果工作表名称发生变化, ...
计算机表格有多少列多少行,『Excle 2016最大行』Excel2016一张工作表包含多少行，多少列，多少单元格...
电脑装上了2019版EXCEL,最大承受行数竟然只有65536行,为什么你的是xls格式吧 excel2016抢鲜版最多多少行 excel2016抢鲜版最多多少行 1.文件的后为*.xls,那么多就 ...
python xlsx 图片_实例11：用Python给Excel所有工作表添加图片
我们在实例9里面展示了如何批量填写每日出货清单,每一天的清单都是直接复制"出货单模板",然后在其中填入出货产品信息的.openpyxl有一个问题,就是在复制工作表的时候,无法跟着复 ...
VBA禁止更改工作表名称
'VBA禁止更改工作表名称 Private Sub workbook_sheetselectionchange(ByVal sh As Object, ByVal target As Range)If ...

vba 指定列后插入列_如何用【VBA】快速批量提取多个工作表名称？

vba 指定列后插入列_如何用【VBA】快速批量提取多个工作表名称？相关推荐

最新文章

热门文章