小编lb9*_*b90的帖子

VBA - 用于创建n乘m矩阵的函数

我目前正在使用数组和循环,我正在尝试编写一个函数,它将输出一个数字为{1,2,3,...,n*m}的n×m数组(矩阵)

我正在尝试学习一些基本的VBA代码,这纯粹是出于教育目的.

这就是我想出的:

Function createMatrix(n, m)    
Dim matrix(1 To n, 1 To m) As Integer    
x = 1    
For i = 1 To n
    For j = 1 To m        
        matrix(i, j) = x            
        x = (x + 1)            
    Next j
Next i   
createMatrix = matrix    
End Function
Run Code Online (Sandbox Code Playgroud)

它回来了#VALUE.我不明白为什么.

我让它在一个点上工作(创建一个3x3矩阵),使它成为一个不接受任何变量的函数,然后通过以下方式初始化矩阵数组:

Dim matrix(1 to 3, 1 to 3) As Integer
Run Code Online (Sandbox Code Playgroud)

用3s 替换nmfor循环.

所以我猜变量nm导致问题,但不知道为什么.

excel vba matrix

3
推荐指数
1
解决办法
2万
查看次数

标签 统计

excel ×1

matrix ×1

vba ×1