Вы можете скопировать значения в любом диапазоне в массив, как показано в коде ниже.Массив будет двухмерным, даже если в нем только один столбец или одна строка.
В приведенном ниже примере я копирую весь столбец, включая пустые ячейки, вы можете определить свой собственный диапазон.
Public Sub sample()
Dim v As Variant
v = ActiveWorkbook.Sheets("Sheet1").Range("A:A")
End Sub
Нарезка на одно измерение может быть выполнена следующим образом:
Public Sub sample()
Dim v As Variant
Dim colValues As Variant
v = ActiveWorkbook.Sheets("Sheet1").Range("A:A")
colValues = Application.Transpose(Application.Index(v, 0, 1))
End Sub
Здесь описана нарезка массива - Большое спасибо