[文本处理] 如何把多个EXCEL或者CSV文件行行对应合并到一个EXCEL中

# 2>nul 3>&2 & echo off & cls
# & gawk -f "%~f0" %1.\*.csv > Merge.csv
# & pause & exit /b
# 使用方法：既可以放在 csv 文件所在目录直接执行，也可以放在别的位置，把 csv 所在目录拖到脚本图标上即可。

BEGIN {
  while ( !isDone++ ) {
    for ( i = 1; i < ARGC; i++ ) {
      if ( getline < ARGV[i] == 1 ) {
        isDone = 0
        printf $0 " "
      }
    }
    print ""
  }
}
复制代码

/*&cls&echo off
del "$合并结果.csv" 2>nul
dir /a-d/b *.csv|cscript -nologo -e:jscript "%~f0">"$.tmp"
ren "$.tmp" "$合并结果.csv"
pause&exit
*/

var fso = new ActiveXObject('Scripting.FileSystemObject'), a=[];
while(!WSH.StdIn.AtEndOfStream){
    var line = WSH.StdIn.ReadLine();
    var f = fso.OpenTextFile(line, 1);
    try{
        var txt = f.ReadAll().split(/[\r\n]+/);
        f.Close();
        for(var i=0;i<txt.length;i++)a[i]?a[i]+=' '+txt[i]:a[i]=txt[i];
    }catch(e){}
}
for(var b in a)WSH.echo(a[b]);
复制代码

a[i]+=' '+txt[i]
复制代码

a[i]+=',,'+txt[i]
复制代码

paste -d" " *.csv > merge.csv
复制代码

/*&cls&echo off
del "$合并结果.csv" 2>nul
dir /a-d/b *.csv|cscript -nologo -e:jscript "%~f0">"$.tmp"
ren "$.tmp" "$合并结果.csv"
pause&exit
*/

var fso = new ActiveXObject('Scripting.FileSystemObject'), a=[], b=[], n=0, m=1, max=0, s='';
for(var i=0;i<5000;i++)s+=',';
while(!WSH.StdIn.AtEndOfStream){
    var line = WSH.StdIn.ReadLine();
    var f = fso.OpenTextFile(line, 1);
    try{
        var txt = f.ReadAll().split(/[\r\n]+/);
        f.Close();if(txt.length>=max)max=txt.length;
        for(var i=0;i<txt.length;i++){
            if(!/"/.test(txt[i])){
                b[m]=txt[i].split(',').length;
                n+=b[m];break;
            }
        }
        for(var i=0;i<max;i++){
            if(a[i]){
                if(i<txt.length){
                    a[i]+=','+txt[i];
                }else {a[i]+=s.substr(0, b[m]);}
            }else{
                if(m==1){
                    a[i]=txt[i];  
                }else a[i]=s.substr(0, n-b[m])+txt[i];
            }
        }
        m++;
    }catch(e){}
}
for(var b in a)WSH.echo(a[b]);
复制代码