Question

有点像VBA的新手，我想知道如何创建一个动态的2D数组，它将是excel中所选数据的大小（不知道数据有多大）。我不熟悉VBA语法和我看到的大多数问题都处理静态数据，其中人知道excel表的大小。我已经创建了一个自动选择excel表中数据的函数。现在我想知道如何将所有这些数据放入2D数组中。

很抱歉，如果这是一个常见的问题，我对使用其他语言的2D数组更熟悉，但是我在使用VBA中的Range，Array和其他人时变得混淆

此外，数据是表格每个元素中的字符串。还请告知我将如何提取这些数据:)谢谢

Answer 1

此代码将为您添加数组..

Sub SelectionToArray()
Dim arrSelection() As String
Dim i As Integer

i = 0
ReDim arrSelection(i)

For Each c In Selection
    arrSelection(i) = c.Value
    i = i + 1
    ReDim Preserve arrSelection(i)
Next c

End Sub

VBA - 将数据从excel提取到动态2D数组

1 个答案: