1、首先,偶分享第一个方法,这个方法可是非常简单的哦。打开一个含有多个工作表的excel工作薄,然后新建一个工作表,此处命名为“汇总表”。
2、找到“查看代码”并打开,查找方法如下图所示,有以下两个方法:1.鼠标右键点击“汇总表”,在下拉菜单中找到“查看代码”;2.找到工具栏中的“开发工具”,可以看到“查看代码”在“控件”下拉菜单中。
3、点击“查看代码”后进入如下对话框,双击“sheet7(汇总表)”可以看到右边弹出sheet7代码输入框,在其中输入以下内容:
Suba()
ForEachshInSheets
k=k+1
Cells(k,1)=
sh.Name
Next
EndSub