如何从指定范围获取值并将其存储在String数组中(excel VBA)

时间:2014-06-06 12:12:04

标签: vba

在我的Excel表格中有一个单元格(比如B4),我将在其中键入我想要选择的单元格范围(比如说D4:D7),现在一旦按下按钮使用宏,我应该得到的值范围中的相应单元格并将其存储在数组中。我怎么能这样做?

任何人都可以帮助我使用VBA代码。提前致谢。

2 个答案:

答案 0 :(得分:0)

您可以直接为数组指定范围:

Dim ary() As Variant
ary = Range(Range("B4").Value)

答案 1 :(得分:0)

假设您在单元格B4中键入范围:

Private Sub Worksheet_Change(ByVal Target as Range) 
    If Target.Address = "$B$4" Then

        Dim rangeAddress As String
        rangeAddress = Range("B4").Text

        Dim arr() As Variant
        arr = Range(rangeAddress)

    End If
End Sub