50767_zh-CN

liliconcom

帮助调试脚本

早上好，

有人可以帮我调试这部分代码

代码应该打开当前数据表的对话窗口。

对于通过对话框选择的数字列，脚本应该使用自己列的平均值来计算空单元格...

但不明白为什么由于某种原因不起作用

 

 

dt =当前数据表（）;

cd =列对话框（

   Myregcol_x = Collist（“选择列>>”，MinCol（1）），

   Hlist（ “”），

  ）;

 

regcol_x = cd [“Myregcol_x”];

nitems = N项（regcol_x）;

colname_num = {};

 

对于（p = 1，p <= nitems，p ++，

colname_num = regcol_x [p] <<获取数据类型;

        if（colname_num ==“Numeric”，

                对于（i = 1，i <= N项（regcol_x），i ++，

                        valuess = Column（regcol_x）<< get values（1）;

                        valuess [Loc（Is Missing（valuess））] = Mean（valuess）;

                        列（regcol_x）<< setvalues（valuess，cc [i]）;

                        ）;

             ）;

）;

 

提前致谢

Gianpaolo

Re：帮助调试脚本

神奇!!!! ，非常感谢

Re：帮助调试脚本

您使用2 For Loops时出现逻辑错误。  我将脚本简化为一次在一列上工作的位置，这消除了第二个For循环

Names Default To Here( 1 );
dt = Current Data Table();

cd = Column Dialog( Myregcol_x = Collist( " Select columns >>", MinCol( 1 ) ), Hlist( "" ), );

regcol_x = cd["Myregcol_x"];
nitems = N Items( regcol_x );
colname_num = {};

For( p = 1, p <= nitems, p++,
 colname_num = regcol_x[p] << Get Data Type;
 If( colname_num == "Numeric",
  valuess = Column( regcol_x[p] ) << get values;
  valuess[Loc( Is Missing( valuess ) )] = Mean( valuess );
  Column( regcol_x[p] ) << setvalues( valuess, cc[p] );
 );
);