VBA中怎么取两个单元格B!和B2的随机值
时间: 2024-09-18 15:07:02 浏览: 37
在VBA (Visual Basic for Applications) 中,你可以使用 `RND` 函数获取0到1之间的随机数,然后结合这两个单元格的实际值来创建一个随机组合。假设单元格B1的内容作为基数范围上限,B2的内容作为基数范围下限:
```vba
Sub GenerateRandomValue()
Dim lowerBound As Double
Dim upperBound As Double
Dim randomValue As Double
' 获取范围的上下限
lowerBound = Range("B2").Value
upperBound = Range("B1").Value
' 使用 RND 函数生成随机数,并加上下限
randomValue = lowerBound + (upperBound - lowerBound) * Rnd
' 将结果放在一个新的单元格(例如 C1)中
Range("C1").Value = randomValue
End Sub
```
这个宏会在每次运行时,从 B2 到 B1 的范围内随机选择一个值并存放到 C1 单元格。
阅读全文