我需要从excel中的数据列表创建一个数组。数据将具有不同的长度,所以我将不得不找到它的末尾然后创建数组。然后,我需要遍历数组并使用每个值。
我以前没有使用过VBA,所以任何帮助。这是我到目前为止能够做到的:

Sub Calc()
Dim endCell As String
endCell = Range("B13").End(xlDown).Row
endCell = "B13:B" + endCell
Dim nums As Variant

nums = Range(endCell)

End Sub

最佳答案

使用移调功能:

nums = Application.WorksheetFunction.Transpose(Range(endCell).value)

关于excel - 数据中的Excel VBA数组,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/9876712/

10-12 17:15