VBA 中怎样透过变量n来创建一个n维矩阵?????

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

例如:

當 n=2,v(1 to 2, 1 to 2)

當 n=3,v(1 to 3, 1 to 3, 1 to 3)

當 n=4,v(1 to 4, 1 to 4, 1 to 4, 1 to 4)

當 n=5,v(1 to 5, 1 to 5, 1 to 5, 1 to 5, 1 to 5)

…

但是n 的数值取决于第一行的变量总数

下面加粗部分求高手修改

Sub a()
n = Application.WorksheetFunction.CountA(Worksheets(1).Rows(1))
Dim v()
redim v(1 to n, ... ,1 to n)
End Sub

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：VBA Application worksheets worksheet function

我觉得，这功能VBA实现不了。一个不是好办法的办法是：
redim v(1 to n^n)
虽然这只是个矢量而不是个矩阵，但是跟你要的矩阵一样有n^n个元素。