介绍
去年@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)