我有一个满是孩子的教室,每个孩子都必须列出他们最喜欢的玩具作为作业.有些孩子只列出1个玩具而有些孩子列出更多.
如何创建一个锯齿状的数组,使得Kids(x)(y)...其中x是我班级中的孩子数量,y是他们列为最喜欢的玩具列表?
介绍
去年@PrzemyslawRemin 提出了一个问题,即如何在 VBA 中将计数器列添加到现有矩阵中, 而无需额外循环且无需修改工作表。
本示例中的原始矩阵是一个(基于 1 的 2 维)数据字段数组,源自(源单元格仅包含它们的地址字符串;要填充数字的插入行)
Dim matrix As Variant
matrix = Range("A1:C5").value
Run Code Online (Sandbox Code Playgroud)
输入矩阵:------------ ? 想要的结果:
+----+----+----+ +----+----+----+----+
| A1 | B1 | C1 | | 1 | A1 | B1 | C1 |
+----+----+----+ +----+----+----+----+
| A2 | B2 | C2 | | 2 | A2 | B2 | C2 |
+----+----+----+ +----+----+----+----+
| A3 | B3 | C3 | | 3 | A3 | B3 | C3 |
+----+----+----+ …Run Code Online (Sandbox Code Playgroud) 我想快速创建一个 6X4 的小整数数组。对于一个小的一维数组,我喜欢使用类似的东西
Dim MyArr()
MyArr = Array(1,2,3,4,5,6)
Run Code Online (Sandbox Code Playgroud)
有没有类似的方法来创建二维数组?我尝试用 ; 分隔行 但
MyArr = Array (1, 2, 3; 4, 5, 6)是无效的。
我想我太懒了,无法设置循环,但单行方法会紧凑且有用。
在 python 中,可以在列表中声明一个列表,例如像这样 l=[[1,0,0],[0,1,0],[0,0,1]] 我该如何做同样的事情,但是在 VBA 中