Excel求助：多个工作表同时提取名称，全部是当前工作表的值。怎么才能不同呢？
发布网友
发布时间：2022-04-26 00:22
共3个回答
热心网友
时间：2023-10-24 07:25
这个简单的函数不能解决的吧，用vba倒是可以。如果你指的是把所有工作表名字汇总到某个表格里面，你可以采用下面这个代码：
Sub sn()
For i = 1 To Sheets.Count
Cells(i, 1).Value = Sheets(i).Name
Next
End Sub
alt+F8，随便输入字符，创建，把上面代码粘贴到打开界面并覆盖原代码，然后
alt+F8执行，就会在当前工作表生成工作表名称汇总列表
---------------------------------------
看了半天，模模糊糊明白，
我也提供一个公式吧
=RIGHT(CELL("filename",A1),LEN(CELL("filename",A1))-FIND("]",CELL("filename",A1)))
热心网友
时间：2023-10-24 07:25
修改一下公式就行了：
=MID(CELL("filename",a1),FIND("]",CELL("filename",a1))+1,255)
热心网友
时间：2023-10-24 07:25
这个公式要复制到不同工作表中,在每个工作表的相对应单元格,得出不同的工作表名.
热心网友
时间：2023-10-24 07:25
这个简单的函数不能解决的吧，用vba倒是可以。如果你指的是把所有工作表名字汇总到某个表格里面，你可以采用下面这个代码：
Sub sn()
For i = 1 To Sheets.Count
Cells(i, 1).Value = Sheets(i).Name
Next
End Sub
alt+F8，随便输入字符，创建，把上面代码粘贴到打开界面并覆盖原代码，然后
alt+F8执行，就会在当前工作表生成工作表名称汇总列表
---------------------------------------
看了半天，模模糊糊明白，
我也提供一个公式吧
=RIGHT(CELL("filename",A1),LEN(CELL("filename",A1))-FIND("]",CELL("filename",A1)))
热心网友
时间：2023-10-24 07:25
修改一下公式就行了：
=MID(CELL("filename",a1),FIND("]",CELL("filename",a1))+1,255)
热心网友
时间：2023-10-24 07:25
这个公式要复制到不同工作表中,在每个工作表的相对应单元格,得出不同的工作表名.
