VBA产生随机数并填充到矩阵

VBA可以使用Rnd函数产生随机数，可以通过使用循环语句将随机数填充到矩阵中。具体实现方法如下：

1. 首先，在Excel中打开Visual Basic Editor，在模块中编写以下代码：

Sub FillRandom()
Dim matrix(1 To 5, 1 To 5) As Double
Dim i As Integer, j As Integer
Randomize
For i = 1 To 5
    For j = 1 To 5
        matrix(i, j) = Rnd()
        Cells(i, j) = matrix(i, j)
    Next j
Next i
End Sub

2. 上述代码中，我们定义了一个大小为5×5的矩阵，并使用Randomize函数初始化随机数生成器。然后，我们使用两个嵌套循环来遍历矩阵中的每一个元素，并使用Rnd函数生成随机数。最后，我们将生成的随机数填充到Excel表格中。

3. 运行上述代码后，Excel表格中将会出现一个大小为5×5的矩阵，并且其中每个元素都是一个随机数。