WPS宏实现表格合并功能

把文件夹中N个表格Sheet1页的数据合并成一个新的表格

function 合并表格() {
    //合并文件为C盘下面名为test的文件夹
    var folderPath = "C:\\test";
    var fileName = Dir(folderPath +"\\*.*");
    
    if(fileName == ""){
        alert("文件为空，无法执行");
    }
        
    //创建合并表格，如果合并文件存在会报错，这里没做校验删除
    var newWork = Workbooks.Add();
    
    while(fileName != ""){
        
        // 打开工作簿
        var workBook = Workbooks.Open(folderPath + "\\" + fileName);
        
        // 执行复制代码
        //默认合并每个表格的Sheet1页
        var lastCol = workBook.Worksheets("Sheet1").Cells(1, workBook.Worksheets("Sheet1").Columns.Count).End(xlToLeft).Column;
        var lastRow = workBook.Worksheets("Sheet1").Cells(workBook.Worksheets("Sheet1").Rows.Co