EXCEL如何提取工作表名称(2016版本)

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

在窗口输入以下代码:

Sub a()

For Each sh In Sheets

k = k + 1

Cells(k, 1) = sh.Name

Next

End Sub

然后点运行

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