记得里面也有for循环语句的

用宏实现,具体VBA语言如下
sub A()
                 dim i as integer, j as integer
                 for i=2 to 100
                     if range('A'&i)=0
                        range('B'&i)="不变"
                     elseif range('A'&i)=1
                        range('B'&i)=“↑1”
                     elseif range('A'&i)=-1
                        range('B'&i)=“↓1”
                     end if
                  next i
            end sub

供参考

谢谢，之前没说是利用stata实现这个需求的，不过VBA是我下一步学习的方向。
非常感谢

王天夫有本STATA图书馆有比较全面可以看看

label define xlbl 0 "不变" 1 "↑1" -1 "↓1"
lab val x xlbl
decode x,gen(y)