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

发布网友 发布时间：2022-04-23 15:32

我来回答

共4个回答

热心网友 时间：2022-04-11 17:59

解决如何获取excel所有sheet的名称的步骤如下：

1.想要获取Excel中所有sheet页名称做成目录，首先“插入”一个sheet页做为目录页，并在A1和B1填写“获取名称”和“列表目录”。

2.点击菜单栏“公式”后，单击“定义名称”。名称中填写标识，引用位置填写“=get.wortbook(1)”后，点击“确定”，完成组合定义。

3.单击A2单元格，输入"=index(标识,row(a2))"回车；鼠标左键点击a2单元格右下角，鼠标变成“+”号后往下拖动鼠标即可将所有sheet页名称填充到列表中，完成sheet名称获取。

4.获取的列表名称是带有文件名称的，需要将文件名称去掉。单击B2单元格，输入“=right(a2,len(a2)-find("xlsx.]",a2,1)-4)”获取最终的列表目录。选中此列所有名称，按“ctrl+c”复制后，右键选择“值粘贴”完成列表。   

这样就解决了如何获取excel所有sheet的名称的问题了。

热心网友 时间：2022-04-11 19:17

实现的方法和详细的操作步骤如下：

1、首先，如果要在Excel中获取所有工作表页面的名称以创建目录，请“插入”一个工作表页面作为目录表，然后填写“获取名称”和“列表目录”在A1和B1上，如下图所示，然后进入下一步。

2、其次，完成上述步骤后，单击菜单栏中的“公式”选项，单击“定义名称”选项。在名称中填写标识，在“引用位置”填写“
 = get.wortbook（1）”，然后单击“确定”按钮以完成组合定义，如下图所示，然后进入下一步。

3、接着，完成上述步骤后，单击单元格A2，然后输入“=index(标识,row(a2))”，按鼠标左键单击单元格a2的右下角，鼠标变为“
 +”，然后向下拖动鼠标。所有工作表页面名称都填充到列表里了，完成了工作表名称的获取，如下图所示，然后进入下一步。

4、最后，完成上述步骤后，获得的列表名称带有文件名，并且该文件名需要删除。单击单元格B2，然后输入如下的公式以获取最终列表目录。选择此列中的所有名称，按键盘上的“ ctrl +
 c”进行复制，右键单击并选择“值粘贴”选项以完成操作，如下图所示。

这样，问题就解决了。

热心网友 时间：2022-04-11 20:52

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名称就都提取出来了。

热心网友 时间：2022-04-11 22:43

1.打开Excel，点击公式，定义名称

2.新建名称，名称写公式名（这里为getSheetName），范围是工作簿，引用位置填=get.workbook(1)，确定

3.在要导入sheet名称的表格中选择sheet总数的列数（比如这里有4个工作簿选4列），输入=TRANSPOSE(getSheetName)，按ctrl+shift+enter即可完成导入

4.成功导入如图