1、首先我们同样选择“公式”，定义一个名称，还是以定义为“A”为例，引用位值处输入“=get.workbook(1)”，然后点击“确定”。
2、接着在同一个列中同时选择20个单元格（有几个工作表就选择几个单元格），在其中输入公式“=TRANSPOSE(A)，然后再键盘后输入“Ctrl+Shift+Enter”，即可看到所有单元格中已经包含了所有的工作表名。
3、选定出现的数据，点复制，点选择性粘贴，数值，再用查找，替换，把工作薄名称去掉，就可以了！
温馨提示：答案为网友推荐，仅供参考
第1个回答 2017-07-21
方法/步骤
，我们将这工作表的名称提到到目录工作表，做一个目录清单。
在"公式”选项卡下选择“定义名称”命令。
点击B1单元格，在名称定义窗口，输入名称：大家自己定义，在下方输入公式index(get.workbook(1),row(A1)&T(NOW())
下面详细解释一下get.workbook，这个函数其实是宏表函数，可以提取当前工作簿的所有工作表名。需要先定义再使用。大家如果想了解更多可以百度一下。T（NOW（））部分返回一个空值，目的是让GET.WORKBOOK的函数结果能够实时更新。
在b1单元格输入公式 =IFERROR(HYPERLINK(目录&"!A1",MID(目录,FIND("]",目录)+1,99)),"")
GET.WORKBOOK函数返回的结果类型为“工作簿名称”+后缀名+工作表名称。而且HYPERLINK函数是用来屏蔽错误。
而很多朋友反映不能是成功。保存时需要选择保存类型为“excel启用宏的工作簿”
既然是宏，大家还得在excel选项下的信任中心。将安全设置为“启用所有宏”
，我们将这工作表的名称提到到目录工作表，做一个目录清单。
在"公式”选项卡下选择“定义名称”命令。
点击B1单元格，在名称定义窗口，输入名称：大家自己定义，在下方输入公式index(get.workbook(1),row(A1)&T(NOW())
下面详细解释一下get.workbook，这个函数其实是宏表函数，可以提取当前工作簿的所有工作表名。需要先定义再使用。大家如果想了解更多可以百度一下。T（NOW（））部分返回一个空值，目的是让GET.WORKBOOK的函数结果能够实时更新。
在b1单元格输入公式 =IFERROR(HYPERLINK(目录&"!A1",MID(目录,FIND("]",目录)+1,99)),"")
GET.WORKBOOK函数返回的结果类型为“工作簿名称”+后缀名+工作表名称。而且HYPERLINK函数是用来屏蔽错误。
而很多朋友反映不能是成功。保存时需要选择保存类型为“excel启用宏的工作簿”
既然是宏，大家还得在excel选项下的信任中心。将安全设置为“启用所有宏”
相似回答