Listbox с многократным выделением

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

wild_pig

Дата: Воскресенье, 20.01.2013, 22:03 | Сообщение № 1

Группа: Проверенные

Ранг: Обитатель

Сообщений: 518

Репутация: 97 ±

Замечаний: 0% ±

2003, 2013

Доброго времени суток, добрые люди.
Как использовать значения "отмечен/не отмечен" Listbox'а с многократным выделением в своих корыстных целях, а именно: значения в соседних ячейках поставить согласно пунктам списка отмечен =0, не отмечен остаётся значение строки в списке.

К сообщению приложен файл: 6456808.xls (28.5 Kb)

Ответить

ikki

Дата: Воскресенье, 20.01.2013, 22:32 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 1906

Репутация: 504 ±

Замечаний: 0% ±

Excel 2003, 2010

изучаем в справке описание и пример использования свойства Selected объекта Listbox.
и вешаем соответствующую обработку на нужное событие (нажатие кнопки или изменение списка - непонятно, что именно вам надо).

помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki

Ответить

RAN

Дата: Воскресенье, 20.01.2013, 22:38 | Сообщение № 3

Группа: Друзья

Ранг: Экселист

Сообщений: 5660

Репутация: 1163 ±

Замечаний: 0% ±

2010

[vba]

Код

Private Sub ListBox1_Change()
     For i = 0 To ListBox1.ListCount - 1
         Cells(i + 1, 2) = IIf(ListBox1.Selected(i), "0", i + 1)
     Next
End Sub

[/vba]

Быть или не быть, вот в чем загвоздка!

Ответить

wild_pig

Дата: Понедельник, 21.01.2013, 01:03 | Сообщение № 4

Группа: Проверенные

Ранг: Обитатель

Сообщений: 518

Репутация: 97 ±

Замечаний: 0% ±

2003, 2013

Благодарю.

Ответить

Listbox с многократным выделением

Страница 1 из 1
1