工具软件:
- WPS 办公软件
- WPS JS宏编辑器
代码如下:
1、合并多工作薄
代码解释:
使用Open()方法打开文档,Open()方法官方并没给出详细的说明,本人在网查找了一下:Open(FileName,[UpdateLinks],[ReadOnly],[Format],[Password],[WriteResPassword],[IgnoreReadOnlyRecommended],[Origin],[Delimiter],[Editable],[Notify],[Converter],[AddToMru],[Local],[CorruptLoad])。没有的参数应使用undefined来占位。
var wb2=Workbooks.Open(pah1,undefined, true, undefined, "pnpostdfgz", undefined, undefined, undefined, undefined, undefined, undefined, undefined,true);
function 合并多工作薄(){
var wb1=ThisWorkbook;
var pah=wb1.Path+"\\导入文件\\*.xls";
//var pah=wb1.Path+"\\导入文件\\*.{xls,xlsx}";
var i=1
var file=Dir(pah);
while (true){
try{
Application.DisplayAlerts =false
var pah1=wb1.Path+"\\导入文件\\"+file;
var wb2=