作者：乔山办公网日期：
返回目录：excel表格制作
用INDIRECT函数可以实现。如INDIRECT(B5&"!C8")，B5单元格中存放的是另一工作表的名称，C8就是你要引用的工作表的单元格。
比如"北京"在B1单元格,=INDIRECT(""&B1&"!A1")
公式引用北京表中的A1单元格内容
这个可以通过一个返回由文本字符串指定位置的引用函数indirect
这个函数其实就是将你愿不的公式以文本的形式填入进去，举例说明，我建立了三个工作表，表名为1-1、1-2、1-3，并在A1单元格填的1、2、3在sheet表中A列分别填写的是1-1、1-2、1-3，原本的公式是=’1-1’!A1
因此公式为：=indirect(”’”&A1&”’!A1”)
如下图
展开说明：
语法
INDIRECT(ref_text,[a1])
Ref_text 为对单元格的引用，此单元格可以包含 A1-样式的引用、R1C1-样式的引用、定义为引用的名称或对文本字符串单元格的引用。如果 ref_text 不是合法的单元格的引用，函数 INDIRECT 返回错误值7a686964616fe58685e5aeb9338#REF!或#NAME?。
如果 ref_text 是对另一个工作簿的引用（外部引用），则工作簿必须被打开。如果源工作簿没有打开，函数 INDIRECT 返回错误值#REF!。
a1 为一逻辑值，指明包含在单元格ref_text 中的引用的类型。
如果 a1 为 TRUE 或省略，ref_text 被解释为 A1-样式的引用。
如果 a1 为 FALSE，ref_text 被解释为 R1C1-样式的引用。
望采纳，谢谢！
Private Sub Worksheet_Activate()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Sheets
x = x + 1
Cells(1, x) = sh.Name
Next
End Sub
事件写百在总结工作表里，或者你弄成工作薄度事件也行。
另外专，总结表格不加进去的话，可以加属个判断就可以了。