This code copies columns 1 & 2 from first sheet of every workbook into a single new workbook. I hope it helps.
newbook;
string sbook$ = %H;
wks.ncols = 0;
doc -e W {
if (%H == sbook$) continue;
dataset ds1 = col(1);
dataset ds2 = col(2);
win -a %(sbook$);
wks.ncols += 2;
copy ds1 wcol(wks.ncols-1);
copy ds1 wcol(wks.ncols);
}
Thanks,
Chris Drozdowski
Originlab Technical Support