如题所述
这个问题可以用两个方法解决。
一是用代码法。二是用数据选项卡里的新建查询功能方法。
下面分别说明。
代码法:
新建一个表格并命令工作表名为sheet1
把sheet1放在所有工作表的最前面
ATL+F11打开VBA代码编辑器
把下面的代码复制并粘贴到对就在工作表代码编辑区
sub listsh
for each sh in sheets
i=i+1
cells(i,1)=sh.name
next
end sub
运行以上代码并查看结果。
查询功能法:
打开工作工作簿
新建一个工作表
菜单栏→数据→新建查询→从文件
选定文件后会转到导航器,选定图中工作簿,下边的转换数据
自动打开power quuery
在左边列表中找到工作簿名称并单击选定,把NAME列保留,其它列删掉。
关闭并上载
结果如图。
温馨提示:答案为网友推荐,仅供参考