vba编辑生成一个B1B2范围内的随机小数A，小数点保存两位，然后生成B3B4范围内9个随机小数，小数点也保存两位，将A分别与9个随机小数相加，将结果放到D4-D12中

在VBA中，你可以使用`Rnd`函数生成随机数，并结合数组和循环来完成这个任务。以下是步骤：

1. 首先，生成B1到B2范围内的随机小数A，保留两位小数：

Dim A As Double
A = Round(Rnd() * (B2 - B1) + B1, 2)

这里我们假设B1单元格是0.1，B2是1.0，`Rnd()`会生成0到1之间的随机数，乘以(B2-B1)再加上B1是为了得到指定范围内的随机数。

2. 然后生成B3到B4范围内的九个小数数组，并同样保留两位小数：

Dim randomNumbers(1 To 9) As Double
For i = 1 To 9
    randomNumbers(i) = Round(Rnd() * (B4 - B3) + B3, 2)
Next i

3. 将A分别与这九个小数相加并存储到D4到D12：

Dim index As Integer
For index = 1 To 9
    D4(index) = A + randomNumbers(index)
Next index

在这个例子中，`D4(index)`表示D列当前行的值，从D4开始依次填充直到D12。