EXCEL如何提取工作表名称（2016版本）

勾选开发工具，在要输出的表下，点查看代码

在窗口输入以下代码：

Sub a()

For Each sh In Sheets

k = k + 1

Cells(k, 1) = sh.Name

Next

End Sub

然后点运行

工作表的名称就拷贝到一个表里了。