Question

如何获取excel所有sheet的名称?

Answer 1

这个问题可以用两个方法解决。

一是用代码法。二是用数据选项卡里的新建查询功能方法。

下面分别说明。

代码法：

1. 新建一个表格并命令工作表名为sheet1

2. 把sheet1放在所有工作表的最前面

3. ATL+F11打开VBA代码编辑器

4. 把下面的代码复制并粘贴到对就在工作表代码编辑区

sub listsh    

for each sh in sheets    

i=i+1    

cells(i,1)=sh.name    

next    

end sub    

运行以上代码并查看结果。

查询功能法：

打开工作工作簿

新建一个工作表

菜单栏→数据→新建查询→从文件

选定文件后会转到导航器，选定图中工作簿，下边的转换数据

自动打开power quuery

在左边列表中找到工作簿名称并单击选定，把NAME列保留，其它列删掉。

关闭并上载

结果如图。