EXCEL 工作薄里面有很多工作表，怎样提取所有工作表名称？

Question

请问，EXCEL 工作薄里面有很多工作表，怎样提取所有工作表名称，在一列下面显示？

Answer 1

定义个名称，公式，定义名称，定义名称，名称框输一名称（如bm）复制这公式=REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),)&T(NOW())粘贴到引用位置框，确定，提取表名的起始位置=index(bm,1,row(a1))下拉（那a1的1表示从第一个工作表开始提取），提取出来后，复制，选择性粘贴为数值后，公式下的名称管理器，找到刚定义的名称删除它

Answer 2

可以使用宏，例如：
sub 宏1()
dim i

for i=1 to sheets.count

cells(i,1)=sheets(i).name

next i

end sub