3-7WPSJS宏工作表移动复制实例-2(多工作簿的多工作表合并)学习笔记

 **************************************************************************************************************

点击进入 -我要自学网-国内领先的专业视频教程学习网站

**************************************************************************************************************

本次讲解将多工作簿中的工作表合并到同一个工作簿。

function 批量工作表合并(){ var num1=1 var wb1=ThisWorkbook;//当前运行的工作薄 var pah=wb1.Path+"\\测试文件夹\\*.xlsx"//路径+内容赋值给pah var file=Dir(pah);//遍历文件*.xlsx while(file!=""){ var pah1=wb1.Path+"\\测试文件夹\\"+file;//路径+名字赋值给pah1 var wb2=Workbooks.Open(pah1);//打开遍历的第一个文件 for(var sh of wb2.Sheets){//循环打开的工作薄中的工作表 sh.Copy(null,wb1.Sheets(num1));//复制到当前运行的工作薄 num1++//这序号+1是用来控制表示某个工作表 wb2.Close() file=Dir() }}}