Hi Giselher,
Please try the following script.//////////////////////////////////////////////
sortkeycol=1; //column# to be sorted
int ncol=wks.ncols; //# of cols
colcopy irng:=[%H]!(1,$(ncol)) orng:=[%H]!wcol(ncol+1); //append duplicated cols
wsort w:=<active> irng:=($(ncol+1):end) bycol:=$(sortkeycol) descending:=0; //sort duplicated cols
//////////////////////////////////////////////
I hope this does your job.
--Hideo Fujii
OriginLab