Страницы: 1
RSS
Подстановка динамического имени диапазона в выпадающий список в юзерформе (VBA)
 
Доброго времени суток!

Что то никак не могу разобраться с синтаксисом :(
Скриптом спамить не буду, кратко опишу.

Есть форма для заполнения юзерами. В форме есть выпадающие списки, которые формируются в зависимости от участка работы юзера. Т.е. выбор участка - выбор линии (динамический диапазон через ВПР).
В общем вопрос - как правильно указать VBA что имя источника для популяции списка Lines именно L (последняя строка).
Код
Dim L As String
L = CStr(main.Range("LineSource"))
Lines.List = lists.Range("" & L & "").Value
Такой вариант не работает - та же ошибка 1004
Lines.List = lists.Range("" & Range("LineSource") & "").Value

L определяется как, например, П_ЭСП.
Динамический список с 12 позициями так и называется П_ЭСП. Число списков будет пополняться, равно как и число участков.
Вот это
Код
Lines.List = lists.Range("П_ЭСП").Value
- заполняет список без проблем :(

Заранее спасибо!
Изменено: Павел - 25.08.2019 00:49:59
 
Уберите кавычки. L  без них String
 
Все работает! Спасибо!
Ошибка в другом месте была
Изменено: Павел - 25.08.2019 11:47:15
 
За Вас порадоваться? А как же другие посетители темы?
Нашли проблему - поделитесь, иначе теме - мусор.
Страницы: 1
Наверх