Tag: 界限

Excel VBA – 分配数组更改LBound和UBound

我在Excel中有一些非常大的数据集,我需要parsing – 在数组中执行比在工作表中循环数据更快。 将所有数据加载到数组中导致内存问题(数据集ARE很大),所以我打算将数据的子集加载到数组中,处理该数据,然后加载另一个子集。 我希望使用定义LBound和UBound的数组“function”来帮助我跟踪工作表中的位置。 但是我发现将工作表值分配给数组会改变界限。 下面的代码演示了这个问题… Sub myTest3() Dim myRange As Range Dim myArray As Variant Dim myOffset As Long myOffset = 10 Set myRange = Worksheets("RawData").Range("A1").CurrentRegion ReDim myArray(myOffset To myRange.Rows.Count, myRange.Columns.Count) MsgBox LBound(myArray, 1) & " to " & UBound(myArray) Set myRange = myRange.Offset(myOffset, 0).Resize(myRange.Rows.Count – myOffset, myRange.Columns.Count) myArray = myRange.Value2 MsgBox LBound(myArray, […]