操作方法
我们先把需要批量重命名的”名“在一个sheet页的第一列按序列示好，如图。在举的例子里，我们需要将这些外国的名字，每个国家设置一个sheet页
然后批量创建好新的sheet页，这个可以参考我的另外一篇经验，”EXCEL中如何批量新建sheet页“
按”开发工具“→”visual basic“
如图选择新建“模块”，在这里要注意，要按到右侧小箭头哦
将这段代码复制进去 —————————————————————————— Sub 重命名() Dim i& For i = 2 To Sheets.Count Sheets(i).Name = Sheets(1).Cells(i, 1) Next End Sub
按图中的运行键运行 然后关闭视图回到正常的EXCEL页面 这里由于我们在“世界国家”的sheet页里的第一行第一列有值“country”此处会跳调试窗口，无视就可以了。或者删除“country”也就不会跳调试窗口了。但对运行结果没有影响。
妥妥地~~那些个sheet页的名字都已经自动重命名好了