Диапазоны в VBA

[Outed]

Помогите с синтаксисом! Есть несколько ячеек которые необходимо перенести в комбобокс, причем ячейки добавляются или удаляются, диапазон постоянно меняется, как это можно сделать? Заранее буду благодарен любой помощи!

[Smogg]

Если у вас никаких признаков, где кончается и начинается диапазон, то и сделать ничего нельзя, кроме как загнать в комбобокс весь столбец или строку (с маленьким фильтром на отсеивание пустых ячеек)

[Outed]

Диапазон начинается с начала столбца или строки допустим с А2 и кончается например А10, вот и нужный диапазон А2:А10, с ним и работаем. Далее в процессе добавляется новая строка или столбец А11 и диапазон меняется А2:А11, необходимо чтобы программа автоматически изменила диапазон и внесла в мой combobox добавленную строку или столбец

[EducatedFool]

получить ссылку на диапазон ячеек можно так:

Dim ra As Range: Set ra = Range(Range("a2"), Range("a" & Rows.Count).End(xlUp))

чтобы комбобокс ссылался на динамический диапазон ячеек (переменной высоты), попробуйте так:

Combobox1.RowSource = Range(Range("a2"), Range("a" & Rows.Count).End(xlUp)).Address

[Outed]

Сообщение от EducatedFool

получить ссылку на диапазон ячеек можно так:

Dim ra As Range: Set ra = Range(Range("a2"), Range("a" & Rows.Count).End(xlUp))

чтобы комбобокс ссылался на динамический диапазон ячеек (переменной высоты), попробуйте так:

Combobox1.RowSource = Range(Range("a2"), Range("a" & Rows.Count).End(xlUp)).Address

Благодарю Вас за помощь, все работает!!!!