WPS宏实现一个表格拆分成多个表格的功能

把首列名称中一样的分别创建该名称+时间戳的新表格，比如有个表格存储各个省的信息，江苏的有50行数据，山西的55行数据等等，这个就是把江苏的创建一个新表保存，山西的创建一个新表格保存。里面主要是表格的创建与关闭相关知识，还有动态给表格对象赋值，实现循环操作表格的目的。

function JIn521() {
    
    //设置工作表对象
    var ws1 = ThisWorkbook.Worksheets('Sheet1');
    //Sheet1页首列复制到Sheet2页并去重
    var lastRow = ws1.Cells(ws1.Rows.Count, 1).End(xlUp).Row;
    var sheet1Range1 = ws1.Range(ws1.Cells(1, 1), ws1.Cells(lastRow, 1));
    Worksheets.Add();
    ActiveSheet.Name = "Sheet2"
    var ws2 = ThisWorkbook.Worksheets('Sheet2');
    sheet1Range1.Copy(ws2.Cells(1, 1));
    ws2.Columns(1).EntireColumn.RemoveDuplicates(1, xlYes);
    
    //D盘下面创建名为test的文件夹
    var folderPath = "C:\\test";
    
    while(Dir(folderPath +"\\*.*") != ""){
    Kill(folderPath + "\\*.*