如果单元格A1是某个值，则B1在两个值之间是随机的

Question

如果单元格是某个值，我想使用VBA在2个值之间分配一个随机数。我在1和12之间有40个随机生成的数字，然后我想给这40个数字中的每个数字分配两个值之间的一个随机数，但是这两个值取决于数字是否为1,2,3，... 。，12。我的代码现在看起来像这样，但是出来的数字并不总是在我给出的限制之间。怎么了？

_

Answer 1

您有错字：

ElseIf Cells(j, 1).Value = 8 Then
    Cells(j, 2).Value = "=RANDBETWEEN(1,2)"

ElseIf Cells(j, 1).Value = 8 Then
    Cells(j, 2).Value = "=RANDBETWEEN(1,8)"

Answer 2

不需要VBA：

=RANDBETWEEN(1,INDEX({2,2,8,8,8,8,4,2,8,10,4,8},A1))

应该做你想要的

要重新计算工作表中的所有功能，请按F9。