相关疑难解决方法(0)

我现在使用以下代码填充我的阵列证券:

Option Base 1
Securities = Array(Worksheets(3).Range("A8:A" & SymbolCount).Value)

这产生了一个二维数组,其中每个地址都是(1 ... 1,1 ... N).我想要一维数组(1 ... N).

我怎样才能(a)将证券作为一维数组填充,或者(b)有效地将证券剥离为一维数组(我在每个循环中陷入困境).

可能重复:
在excel中每X行插入一行

我有一大堆数据(假设它从B5到J500,让我们说这个范围被命名为rngOutput).我试图浏览这些数据,每x行添加2个空行,其中x是用户指定的数字.例如,如果x为10,则应插入每10行2个新行.从概念上讲,这是应该工作的代码:

For i = 1 to Number of rows in rngOutput
   If i mod x = 0 Then
        Insert 2 Rows
   End If
Next i

但是,当您插入2个新行时,行数会更改并且公式会混乱(即它在前10行之后添加2行,然后在接下来的8行之后再添加2行(因为它会计算这2个新行)添加为实际行)然后在接下来的6行之后添加另外2行等.

我试图找到一种方法来完成每x行数干净地添加2个新行,以避免上述问题.

感谢您的帮助,如果您需要进一步说明,请告诉我们!