返回目录：excel表格制作
实现的方法和详细的操作步骤如下：
1、首先，如果要在Excel中获取所有工作表页面的名称以创建目录，请“插入”一个工作表页面作为目知录表，然后填写“获取名称”和“列表目录”在A1和B1上，如下图所示，然后进入下一步。
2、其次，完成上述步骤后，单击菜单栏中的“公式”选项，单击“道定义名称”选项。版在名称中填写标识，在“引用位置”填写“
= get.wortbook（1）”，然后单击“确定”按钮以完成组合定义，如下图所示，然后进入下一步。
3、接着，完成上述步骤后，单击单元格A2，然后输入“=index(标识,row(a2))”，按鼠标左键单击单元格a2的右下角，鼠标变为“
+”，然后向下拖动鼠标。所有工作表页面名称都填充到列表里了，完成了工作表名称的获取，如下图所示，然后进入下一步。
4、最后，完成上述步骤后，获得的列权表名称带有文件名，并且该文件名需要删除。单击单元格B2，然后输入如下的公式以获取最终列表目录。选择此列中的所有名称，按键盘上的“ ctrl +
c”进行复制，右键单击并选择“值粘贴”选项以完成操作，如下图所示。
这样，问题就解决了。
1、首先我们同样选择“公式”百，定义一个名称，还是以定义为“A”为例，引用位值处输入“=get.workbook(1)”，然后点击“确定”。
2、接着度在同一个列中同时选择问20个单元格（有几个工作表就选择几个单元格），在其中输入公式“=TRANSPOSE(A)，然后再键盘后输入“Ctrl+Shift+Enter”，即可看到所有答单元格中已经包含了所有的工作表名。版
3、选定出现的数据，点复制，点选择性粘贴，数值，再用查找，替换权，把工作薄名称去掉，就可以了！
1、电来脑打开Excel表格。
2、按Alt+F11进入VBA。
3、进入VBA后，自点击插入模百块。
4、点击插入模块后，输入代码
sub m
for each sh in sheets
k=k+1
cells(k,1)=sh.name
next
end sub
然后点击运度行问。
5、点击运行后，所有sheet名称就都提取出答来了。