Получить значения для хранения в массиве VBA

Question

У меня есть значения, хранящиеся в листе, называемом config, и исходят из H2 (список динамический, поскольку можно добавить больше). Поэтому я использую следующий код:

roomCount = ActiveWorkbook.Worksheets("config").Range("H2", Worksheets("config").Range("H2").End(xlDown)).Rows.Count

Итак, это дает мне количество строк.

То, что я пытаюсь сделать, но я просто не могу понять, как это сделать, - создать цикл для сохранения этих значений начиная с H2 (используя мой код выше) в массив.

и, возможно, для аргумента msgbox массив при нажатии кнопки.

Answer 1

Нет необходимости проходить через ячейки для построения массива.Вы можете сохранить значения непосредственно в Array, например так:

Dim myvar as Variant    

myvar = ActiveWorkbook.Worksheets("config").Range("H2", Worksheets("config").Range("H2").End(xlDown))

И вы можете просмотреть все элементы, используя:

For Each ele In myvar
    Debug.Print ele
Next

Или напрямую получить доступ к каждому отдельному элементу:

Debug.Print myvar(1,1) 'first element of the array
Debug.Print myvar(2,1) 'second element of the array