Question

怎么让工作表名称等于单元格内容

从系统上导出的EXCEL有很多工作表，而且工作表的命名是一些大写英文字母。
请问怎么样可以快速重命名工作表名称，让每个工作表名称等于他对应的A1单元格上的中文。
如：sheet1表中的标题是三年六班，sheet2表中的标题是三年七班。
怎么样快速的让sheet1、sheet2变成三年六班、三年七班

Answer 1

这个只能用VBA来实现。代码如下：
Sub 工作表名输入()
Cells(1, 1) = ActiveSheet.Name
End Sub
作用是将当前工作表的表名放入A1单元格。

追问

你这个弄错了，我是要让单元格名称等于工作表名称。。不是工作表名称等于单元格。
就是单元格名字是三年六班，工作表名字是01
通过利用宏，把01工作表名称变成三年六班