谁帮忙逐句翻译下这个代码

bingbaicai

Do
        [m22:v23] = 0
            For Each cel In [m22:v23]
               cel.Value = Int(Rnd * 25 - 20)
               If [w22] < 0.85 Then GoTo a
            Next
a:
        Loop While [w22] < 0.85

谢谢

tmtony

大致是一个循环

Do  '循环
        [m22:v23] = 0   '将这个区域初始化这0
            For Each cel In [m22:v23]  '循环这个区域所有 单元格
               cel.Value = Int(Rnd * 25 - 20)  '每个单元格 设置为一个随机数
               If [w22] < 0.85 Then GoTo a   '如果 w22这个 小于 0.85 则跳到 a 处
            Next
a:
        Loop While [w22] < 0.85   

bingbaicai

tmtony 发表于 2017-3-8 11:31
大致是一个循环

Do  '循环

跳到a处？a处是loop while {w22}<0.85?，
int(rnd*25-20)意思是不是结果在（-20，5）里面随机数值？
这个应该是Do loopwhile的应用吧？

谢谢管理员的解答