Excel随机合格率

网友Naomi 提到是否可以控制合格率在85%-100%随机呢？这样我们可以通过公式直接求和：

=RAND()*0.15+0.85   或者

=RANDBETWEEN(85,100)/100

问题进一步升级，此合格率要通过前面的数值来统计的，即随机生成多个数值控制合格率。

比如我要求合格的（-20，20），20组数据，相当于随机产生的20组数值的合格率在85%-100%之间

作者：源理-Office中国

原表

Excel随机合格率  

    生成随机多个数据VBA代码：

        Sub RandPast()       

            Do

            [b2:k3] = 0

                For Each cel In [b2:k3]

                   cel.Value = Int(Rnd * 50 - 20)

                   If [n2] < 0.85 Then GoTo a

                Next

        a:

            Loop While [n2] < 0.85

        End Sub

   合格率计算公式：

    =SUM((B2:K3<=A3)*(B2:K3>=A2))/20