**************************************************************************************************************点击进入 -我要自学网-国内领先的专业视频教程学习网站**************************************************************************************************************本次讲解将多工作簿中的工作表合并到同一个工作簿。代码function 批量工作表合并(){var num11var wb1ThisWorkbook;//当前运行的工作薄var pahwb1.Path\\测试文件夹\\*.xlsx//路径内容赋值给pahvar fileDir(pah);//遍历文件*.xlsxwhile(file!){var pah1wb1.Path\\测试文件夹\\file;//路径名字赋值给pah1var wb2Workbooks.Open(pah1);//打开遍历的第一个文件for(var sh of wb2.Sheets){//循环打开的工作薄中的工作表sh.Copy(null,wb1.Sheets(num1));//复制到当前运行的工作薄num1//这序号1是用来控制表示某个工作表wb2.Close()fileDir()}}}function 批量工作表合并(){ var num11 var wb1ThisWorkbook;//当前运行的工作薄 var pahwb1.Path\\测试文件夹\\*.xlsx//路径内容赋值给pah var fileDir(pah);//遍历文件*.xlsx while(file!){ var pah1wb1.Path\\测试文件夹\\file;//路径名字赋值给pah1 var wb2Workbooks.Open(pah1);//打开遍历的第一个文件 for(var sh of wb2.Sheets){//循环打开的工作薄中的工作表 sh.Copy(null,wb1.Sheets(num1));//复制到当前运行的工作薄 num1//这序号1是用来控制表示某个工作表 wb2.Close() fileDir() }}}