李大仁博客

天地虽大，但有一念向善，心存良知，虽凡夫俗子，皆可为圣贤。

[VBS]Excel获取所有Sheet的名称

2018年11月8日#excel #vbscript73

AI 生成的摘要

这篇文章介绍了如何使用VBS脚本获取Excel中所有Sheet的名称。第一种方法是在当前Sheet中使用公式获取当前Sheet的名称。第二种方法是使用VBS脚本在当前Sheet中获取Workbook下所有Sheet的名称。

1. 在当前 Sheet 里面获取当前 Sheet 名选取任意单元格，编辑公式

=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,255)

2. 在当前 Sheet 里面获取 Workbook 下所有的 Sheet 名使用 alt+f11 组合快捷键进入 vbe 编辑器，插入一个新的模块，并在模块中输入以下代码：

Sub Maco1()
For i = 1 To Sheets.Count
Cells(i, 1) = Sheets(i).Name
Next
End Sub

然后运行指定宏既可以在当前 sheet 里面获取到了

此文章数据所有权由区块链加密技术和智能合约保障仅归创作者所有。