Страницы: 1
RSS
Обращение к элементам формы из цикла
 
Добрый день!
Подскажите пожалуйста, имеется форма, на которой расположено 15 ComboBox
Имена полей CB1,CB2,CB3......CB15

Можно ли получить их значения циклом?
A2=CB1
A3=CB2
...
A16=CB15

Что то вроде
For Val=1 To 15
Sheets("Лист1").Range("A" & Val + 1) = Form1.<=Переменная=>.Value
Next

Как оформить код в месте выделенном жирным?
 
Код
Sheets("Лист1").Range("A" & Val + 1) = Form1.controls("CB" & val).Value
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
Код
Sheets("Лист1").Range("A" & Val + 1) = Form1.Controls("CB" & Val).Value
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
осталось из двух ответов выбрать тот, что лучше Вам подходит.
Изменено: Ігор Гончаренко - 20.09.2018 14:53:17
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
Ігор Гончаренко, Дмитрий(The_Prist) Щербаков,
Спасибо! Все оказалось действительно очень просто)
Ігор Гончаренко,  это будет действительно очень сложный выбор)))
Еще раз спасибо)
Страницы: 1
Наверх