自定义 名称可以做，
我自己会用个 小小的 宏
右键 表1 工作表标签---查看代码 --- 把如下代码复制进去， F5 运行
sub shtname() for i=2 to sheets.count activesheet.range("A"& i)=sheets(i).name next end sub
