Релиб / Программирование / VBA / Работа с ListBox / Latest Posts

RE: Работа с ListBox

Masalov — Mon, 03 Sep 2007 07:16:09 GMT

может помочь
[url]http://www.relib.com/forums/Topic896547-11-1.aspx[/url]
[url]http://www.relib.com/forums/Topic908601-11-1.aspx[/url]

RE: Работа с ListBox

vlth — Fri, 31 Aug 2007 12:32:42 GMT

Заголовки столбцов будут видны только при двух условиях (реализованы в твоём втором примере):

1. ListBox.ColumnsHeads=true

2. ListBox заполняется ссылкой на диапазон раб. листа (ListBox.RowSource= ...)

Работа с ListBox

P_u_n_i_s_h_e_r — Fri, 31 Aug 2007 11:01:53 GMT

Добрый день, с виду простой вопрос, но никак не могу допереть как заполнять заголовки столбцов, нужными мне данными..

Пример 1:
Заголовки остаются пустыми.

lstTransactions.ColumnCount = 6
lstTransactions.ColumnHeads = True

lstTransactions.AddItem "Item " & i & ", Column 1"
lstTransactions.List(i, 1) = "Item " & i & ", Column 2"
lstTransactions.List(i, 2) = "Item " & i & ", Column 3"
lstTransactions.List(i, 3) = "Item " & i & ", Column 4"
lstTransactions.List(i, 4) = "Item " & i & ", Column 5"
lstTransactions.List(i, 5) = "Item " & i & ", Column 6"

Пример 2.
В заголовках появляются Столбец1, Столбец2....

Sheets("Abc").Activate
lstTransactions.ColumnHeads = True
lstTransactions.RowSource = "A1:F10"