Выбор строк в Listbox-е

[Lorgan]

Народ подскажите возможно ли в listbox-е заполненым определенными значениями с возможностью мультивыбора, запретить (сделать неактивными) для выбора определенные строки списка?

[kuklp]

Возможно их туда не заносить.

[blackarrow]

а если сделать управляемый список пунктов для листбокса?

перед активацией формы

1. формируете программно какой вам надо список в ячейках, выделяете диапазон со списком и присваиваете ему имя; здесь как вариант можно заранее приготовить несколько вариантов списков, если задача позволяет работать с фиксированными наборами
2. в качестве источника строк листобокса указываете именованый таким образом рейндж.

[R Dmitry]

Сообщение от Lorgan

Народ подскажите возможно ли в listbox-е заполненым определенными значениями с возможностью мультивыбора, запретить (сделать неактивными) для выбора определенные строки списка?

я думаю все гораздо проще

Private Sub ListBox1_Change()
If ListBox1.ListIndex < 2 Then ListBox1.Selected(ListBox1.ListIndex) = False
End Sub

[Lorgan]

Спасибо, попробую реализовать оба варианта

[Lorgan]

В продолжении темы - столкнулся с проблемой - Как сделать так? что бы при выборе в listbox-e строки 1, блокировались для выбора строки 1.1,.1.2,1.3 и наоборот.
При выборе первой строки заблокировать строку 1.1 получается, но при добавлении второй строки в код - excel зависает. Подскажите знающие как сделать..

з.ы. Пример во вложении

[R Dmitry]

Private Sub ListBox1_Change()
If ListBox1.Selected(0) Then
If ListBox1.ListIndex > 0 And ListBox1.ListIndex < 4 Then
ListBox1.Selected(ListBox1.ListIndex) = False
End If
End If

If ListBox1.Selected(1) Or ListBox1.Selected(2) Or ListBox1.Selected(3) Then
If ListBox1.ListIndex = 0 Then
ListBox1.Selected(ListBox1.ListIndex) = False
End If
End If
End Sub

[Lorgan]

спасибо!заработало!

[Lorgan]

столкнулся с траблой - если выделить первую строку и потом нажать на строку 1.1 и вести вниз с зажатой ЛКМ то пункты все равно выделятся, как победить?