Как из combobox2 исключить значение combobox1?

@Lovinetskiy A · Регистрация: 29.03.2016

Доброго времени суток!
проблема в следующем:

Visual Basic

1	ComboBox1.RowSource = "Работники!H3:H29"

теперь как задать в ComboBox2 такие же значения как и в ComboBox1 т.е. "Работники!H3:H29" за исключением выбранного в ComboBox1?

@Виктор Михалыч · 14.10.2016, 12:53

Что значит

Сообщение от Lovinetskiy A

за исключением выбранного в ComboBox1

?

@Lovinetskiy A · 14.10.2016, 12:57 **[ТС]**

допустим список значений для ComboBox1 Иванов, Петров, Сидров.
в ComboBox1 выбрали Петрова
необходимо чтоб в ComboBox2 список значений составил: Иванов, Сидров. без Петрова.

@Kubuntovod · 14.10.2016, 13:20

Если лишний раз, после выбора, не тыкать во второй бокс, то как-то так:

Visual Basic

Private Sub ComboBox2_Enter()
Dim i As Integer, s As String
  ComboBox2.Clear
  s = ComboBox1.Text
  For i = 0 To ComboBox1.ListCount - 1
    If ComboBox1.List(i) <> s Then ComboBox2.AddItem ComboBox1.List(i)
  Next i
End Sub

@Lovinetskiy A · 14.10.2016, 13:45 **[ТС]**

Спасибо за ответ,
т.е. для 3 бокса запускаем еще один цикл для исключения значений 1го и 2го бокса?

Добавлено через 2 минуты
можешь описать процесс

Visual Basic

Private Sub ComboBox2_Enter()
Dim i As Integer, s As String
  ComboBox2.Clear
  s = ComboBox1.Text
  For i = 0 To ComboBox1.ListCount - 1
    If ComboBox1.List(i) <> s Then ComboBox2.AddItem ComboBox1.List(i)
  Next i
End Sub

@Kubuntovod · 14.10.2016, 13:51

Сообщение от Lovinetskiy A

можешь описать процесс

Да тут описывать то нечего.

Очищаем второй бокс.
Запоминаем (в переменную s) то, что выбрано в первом.
Затем, перебираем все элементы первого и вставляем их во второй, проверяя при этом на совпадение с s. Если не совпадает, то добавляем.

Можно другой вариант заюзать. Добавить во второй все, что есть в первом, а потом найти и убить тот, что выбран в первом.

@Lovinetskiy A · 14.10.2016, 13:53 **[ТС]**

круто, всю голову сломал.
разобрался и для третьего и для 10)) спасибо огромное!

@Kubuntovod · 14.10.2016, 13:54

Сообщение от Lovinetskiy A

т.е. для 3 бокса запускаем еще один цикл для исключения значений 1го и 2го бокса?

Да. Только цикл этот должен быть внутри процедуры ComboBox3.Enter

@Виктор Михалыч 280 / 136 / 23 Регистрация: 08.01.2014 Сообщений: 635
	14.10.2016, 12:53	2
	Что значит Сообщение от Lovinetskiy A за исключением выбранного в ComboBox1 ? 0

@Lovinetskiy A 0 / 0 / 0 Регистрация: 29.03.2016 Сообщений: 37
	14.10.2016, 12:57 [ТС]	3
	допустим список значений для ComboBox1 Иванов, Петров, Сидров. в ComboBox1 выбрали Петрова необходимо чтоб в ComboBox2 список значений составил: Иванов, Сидров. без Петрова. 0

@Kubuntovod 2665 / 783 / 174 Регистрация: 14.01.2013 Сообщений: 3,654
	14.10.2016, 13:51	6
	Сообщение от Lovinetskiy A можешь описать процесс Да тут описывать то нечего. Очищаем второй бокс. Запоминаем (в переменную s) то, что выбрано в первом. Затем, перебираем все элементы первого и вставляем их во второй, проверяя при этом на совпадение с s. Если не совпадает, то добавляем. Можно другой вариант заюзать. Добавить во второй все, что есть в первом, а потом найти и убить тот, что выбран в первом. 1

@Lovinetskiy A 0 / 0 / 0 Регистрация: 29.03.2016 Сообщений: 37
	14.10.2016, 13:53 [ТС]	7
	круто, всю голову сломал. разобрался и для третьего и для 10)) спасибо огромное! 0

@Kubuntovod 2665 / 783 / 174 Регистрация: 14.01.2013 Сообщений: 3,654
	14.10.2016, 13:54	8
	Сообщение от Lovinetskiy A т.е. для 3 бокса запускаем еще один цикл для исключения значений 1го и 2го бокса? Да. Только цикл этот должен быть внутри процедуры ComboBox3.Enter 0

Опции темы

Как из combobox2 исключить значение combobox1?

Решение