659163_zh-CN

liliconcom

脚本

大家好，

 

这是我的数据库：

 

 

 

我希望能够删除所有列（从第四列到最后一列）。

我正在使用以下脚本，但它无法正常工作。

 

<SPAN>dt22 = current data table();</SPAN><BR /><BR />max = N cols(dt22);<BR />
For (i=4 , i <= max , i++,
 dt22 << delete columns(i);
);

谢谢您的回答 ！

自动化和脚本编写回复：脚本

最简单的是最有可能使用列列表通过删除列来删除

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Semiconductor Capability.jmp");

col_names = dt << Get Column Names("String");
Remove From(col_names, 1, 4);
wait(2); // for demo purposes
dt << Delete Columns(col_names);

如果要使用 For 循环，请从末尾开始循环以避免索引更改的问题。