Listbox Можно ли и как?

[blind]

Можно ли такое проделать в listbox:

Excel, форма , на ней многоколоночный listbox данные в который подставляються из листа, происходит это вот так:

Код: Выделить всё

Private Sub UserForm_Initialize()
Worksheets("Лист2").Activate
ListBox1.ColumnCount = ActiveSheet.UsedRange.Columns.Count
ListBox1.RowSource = ActiveSheet.UsedRange.Address
End Sub

Учитывая приведённый код заголовки столбцов выводятся в формате заголовков столбцов, те. СтолбецА и тд.

Можно ли вот в таком случае как нить прописать заголовки:

Код: Выделить всё

Private Sub UserForm_Initialize()
Worksheets("Лист2").Activate
ListBox1.ColumnHeads = True
ListBox1.ColumnCount = 13
ListBox1.RowSource = "a2:m13" 'ActiveSheet.UsedRange.Address
End Sub

ListBox1.RowSource = "a2:m13" 'ActiveSheet.UsedRange.Address

Интересует вот эта строка (строка выделенная болдом и цветом). Как задать не жёсткий диапазон а такой при котором сохранилось бы нормальное заглавие столбцов (они в первой строке) и в тоже время диапазон заполнения listbox ограничивался бы существующими данными?
Ибо при жёсткой привязке теряю гибкость, диапазон постоянно растёт.

[uhm]

Не уверен, что правильно понял вопрос, но, возможно, поможет следующая конструкция:

Код: Выделить всё

LRow = Range("A1").SpecialCells(xlCellTypeLastCell).Row
...
ListBox1.RowSource="a2:m" & LRow


В переменную LRow будет записан ряд самой последней используемой ячейки.

[blind]

uhm
странно))))
работает)))
Огромный сенксь, а то уж думал что придёться перейти на listview а я его совершенно незнаю

[Igor_123]

Огромный сенксь, а то уж думал что придёться перейти на listview а я его совершенно незнаю

Вот видишь какую возможность упустил, а теперь listview будешь изучать при другом "пожаре"

[blind]

Igor_123
Я просто так понимаю что listview элемент другого порядка.
Ну в смысле можно ли в нём выбрать целую строку и можно ли его например заполнять из базы?
Как вариант ещё рассматривал возможность treeview но из за его так сказать тяжёлости в восприятии отказался.
Хотя еслиб смог вникнуть как тама и что наверно перешёл бы на них...

[Igor_123]

Я просто так понимаю что listview элемент другого порядка.

На мой взгляд ListBox это очень обрезанный ListView, с добавленной возможностью подключать БД.

Ну в смысле можно ли в нём выбрать целую строку

Можно, свойство есть специальное

и можно ли его например заполнять из базы?

Напрямую нельзя, но есть специальные контролы для работы с базами.

Как вариант ещё рассматривал возможность treeview но из за его так сказать тяжёлости в восприятии отказался.

Какая тяжесть , дерево оно и в африке дерево, только корень "жизни" сверху. Есть родитель, есть потомки, у потомков есть братья(одноуровневые ноды) и т. д.

Хотя еслиб смог вникнуть как тама и что наверно перешёл бы на них...

Не факт. Все зависит от необходимости представления. Например структура папок на диске с трудом представляеться в списке, а дерево подходит очень хорошо.