Excel, ComboBox. Нужно получить две переменных, а LinkedCell один. - VB

Узнай цену своей работы

Формулировка задачи:

Здравствуйте.
Есть таблица из шести столбцов.
Есть ComboBox привязанный к этой таблице в режиме разработчика с помощью ListFillRange.
В параметре LinkedCell указана определенная ячейка.
Меняя параметр BoundColumn я могу вывести в эту ячейку значение нужного столбца из таблицы, при выборе какой то строки в ComboBox-е.
Это все работает.
Но мне нужно при выборе строки в ComboBox-е получать одновременно ДВА значения из исходной таблицы для дальнейших расчетов. Например, из 3-го столбца и из 6-го. Но LinkedCell только один.
Полагаю, второе значение можно сделать с помощью VBA, но как?

Решение задачи: «Excel, ComboBox. Нужно получить две переменных, а LinkedCell один.»

textual
Листинг программы
Private Sub ComboBox1_Change()
Dim i&
  i = ComboBox1.ListIndex 'номер выбранной строки или -1 если ничего не выбрано
  If i > -1 Then
    Range("E3") = ComboBox1.List(i, 1) 'значение из второго столбца
  Else
    Range("E3").ClearContents
  End If
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 4.167 из 5
Похожие ответы