excel按字段拆分+拆分各工作表成多张新表+多表批量重命名

1.按字段拆分
使用工具EXCEL插件（“DIY工具箱”—最左侧的收纳箱内搜索"拆分"）。可将总表按分类字段"例如-班级"，自动按字段拆分成多张表

（不确定是否是方方格子带的那个excel工具箱插件？地址：

http://www.ffcell.com/home/ffcell.aspx）

2.将工作簿的多张工作表拆分成多张EXCEL（例如-班级）
使用VBA宏

打开需要拆分的excel，在任意工作表右击，点击“查看代码”
在打开的窗口中输入如下代码：

Private Sub 分拆工作表()

       Dim sht As Worksheet

       Dim MyBook As Workbook

       Set MyBook = ActiveWorkbook

       For Each sht In MyBook.Sheets

           sht.Copy

           ActiveWorkbook.SaveAs Filename:=MyBook.Path & "\" & sht.Name, FileFormat:=xlOpenXMLWorkbook     '将工作簿另存为xlsx格式

           ActiveWorkbook.Close

       Next

       MsgBox "文件已经被分拆完毕!"

   End Sub

点击绿色三角，运行程序，等待拆分，在原excel所在文件夹自动生成新的各字段excel。

3.批量将拆分后的各工作表重命名（例如，批量在班级后加统一文字）

使用工具"Advanced Renamer"(应该也可以运用到其他文件和用处)

https://www.xiazaiba.com/html/3098.html

可改进之处：按分类字段拆分时，应该可以用VBA宏的方式？不一定依赖方方格子插件，它应该也是内置了宏？