Как привязать конкретный combobox компонента к определённой ячейке таблицы Excel? - VB

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

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

Имеется 4 Combobox'а. В каждом из них имеется определённый список, который можно выбрать непосредственно.. Как сделать так чтобы после нажатия кнопки, данные выбранные в Combobox'ах переносились в документ Excel к определённой ячейке(т.е. каждый комбобокс по отдельным ячейкам), например, combobox1 - к ячейке С2, combobox2 - к ячейке С3, combobox3 - к ячейке С4, и combobox4 - к ячейке С5

Решение задачи: «Как привязать конкретный combobox компонента к определённой ячейке таблицы Excel?»

textual
Листинг программы
  1. Option Explicit
  2.  
  3. Private Sub ComboBox1_Click(): Cells(2, 3) = ComboBox1.Text: End Sub
  4. Private Sub ComboBox2_Click(): Cells(2, 5) = ComboBox2.Text: End Sub
  5. Private Sub ComboBox3_Click(): Cells(2, 7) = ComboBox3.Text: End Sub
  6. Private Sub ComboBox4_Click(): Cells(2, 9) = ComboBox4.Text: End Sub
  7.  
  8. Private Sub CommandButton1_Click()
  9.     Dim i&, j&, v
  10.     With Лист2
  11.         For Each v In Array(ComboBox1, ComboBox2, ComboBox3, ComboBox4)
  12.             i = i + 1: v.Clear
  13.             For j = 1 To .Cells(Rows.Count, i).End(xlUp).Row
  14.                 v.AddItem .Cells(j, i)
  15.             Next
  16.             v.ListIndex = 0
  17.         Next
  18.     End With
  19. End Sub

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


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

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

6   голосов , оценка 3.667 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы