VBA диапазон программно в список
2247
5
Для екселя нужно вставить в список диапазон значений
Пишу Rage2.Range("B11").Value = "=R"+число(значение1)+"C1"+":R"+число("Значение2")+"C1";
где значения вычесляются
Не получается.

Проверить и внести значения можно интерактивно
в Данные-проверка-источник.

пробовал еще так
Page2.Range"=R"+число(значение1)+"C1"+":R"+число("Значение2")+"C1).Select(); Page2.Selection.Name="Название";
ругается на Selection - типа нет такого объекта.
В книге "VBA" гарнаева нифига не написано.
AKKRILL
Проверить и внести значения можно интерактивно
ну так и внесите, предварительно запустив запись макроса :ухмылка:
tpi
так макроса нет.
макрос обязательно писать?
или каким -нить другим образом можно в список внести?
AKKRILL
Запускаете запись макроса, вносите в ячейку нужную формулу, останавливаете запись. Смотрите какой макрос образовался и из него берете формулу.

"Сервис, макрос, начать запись"
"alt+f11" - посмотреть какой модуль с макросом записался.
tpi
сделал
Ex.Range("B11").Validation.Delete();
Ex.Range("B11").Validation.Add(3,1,1,"=R"+сокрЛП(число(Номерячейки1))+"C1:R"+сокрЛП(число(Номерячейки2))+"C1","");
Ex.Range("B11").Validation.IgnoreBlank = 1;
Ex.Range("B11").Validation.InCellDropdown = 1;
Ex.Range("B11").Validation.ShowInput = 1;
AKKRILL
теперь можите использовать этот кусок как есть в программе vba или модифицировать по вкусу.