改一下代码,即可 sub 相同26个顺序与数值的个数计算() set dic=createobject("scripting.dictionary") x=selection(selection.count).row y=selection(1).row z=selection(1).column for i=x to y+25 step-1 dic(cells(i,z)&"|"&cells(i-...
a1:=ma(c,60);aa:=a1>ref(a1,1);bb:=every(aa,10);cc:=abs(c/a1-1)<0.06;dd:=c/ref(c,1)>1.04;xg:bb and cc and dd;你发的这三个公式不改也可以使用,为啥我都把你加了xg呢,这是因为,你建的选股公式,可以建成附图,再在k线图中调出来,那么满足条件的选股的地方就会出现一个白色的尖尖。加...