ReDim:重新定义数组大小,但不保留数组中的现有数据。 ReDim Preserve:重新定义数组大小,同时保留数组中的现有数据。但需要注意的是,使用Preserve关键字时,只能改变数组的最后一维的大小。 2. 代码示例 示例1:不保留现有数据 vba Dim MyArray(3) As Integer MyArray(0) = 1 MyArray(1) = 2 MyArray(2) = ...
不在。VBA在重新定义数组大小时，原有的数组数据就会丢失。如果需要保留原来的数据，可以使用Preserve关键字:ReDimPreservearray1，数据是事实或观察的结果，是对客观事物的逻辑归纳，是用于表示客观事物的未经加工的原始素材。
1) brr(j, 2) = arr(i, 2) j = j + 1 End If Next i MsgBox UBound(brr) Range("F2").Resize(UBound(brr), 2) = brrEnd Sub 其实你这个不用数组也能实现你要的目的，如下：Sub shaixuan1() Range("F1") = "Name" Range("G1") = "Price" For...