Страницы: 1
RSS
ComboBox c двумя и более столбцами, и с заголовком
 
Здравствуйте, в ComboBox есть возможность создать список с множеством столбцов, плюс к этому есть возможность обозвать эти столбцы заголовком.  
 
Вопросры:  
   1. Как присвоить имена заголовкам?  
   2. Как добовлять строки в списке?  
   3. Как индексируються столбцы?  
 
Заранее большое спасибо
 
Вопрос незнайки:  
Вы с ListBox не перепутали?
 
Нужно установить свойства ComboBox1:  
ColumnCount =  3(количество столбцов)  
ColumnHeads = True (строка над данными - заголовки)  
RowSource = =Лист1!A2:C6 (диапазон ниже заголовков)  
 
См. приложение
 
Какай смысл - ведь выбирается из первого столбца?
 
{quote}{login=vikttur}{date=20.10.2010 01:33}{thema=}{post}Какай смысл - ведь выбирается из первого столбца?{/post}{/quote}  
Может быть полезно - по данным других столбцов выбрать нужное из первого.  
Спасибо.
 
Из таблицы я могу вытащить любые данные, в принцепе и сделать так, что бы в Value попадало значение хоть из 3 столбца. И могу все три значения из разных столбцов передать в три разные ячейки, после выбора строки с нужными данными.  
Вот только с заголовками у меня засада!!!  
А по мимо диапазонов, в ручную, можно задать произвольные названия, не привязываясь к диапазонам RowSource?
 
Спасибо, это я усвоил)))  
Тогда другой вопрос:  
могу ли я, при инициализации формы, задать диапазон, программным путем?
 
Почему то не работает при задании диапазона при инициализации, посмотрите пожалуйста, голова лопаеться!!! На листе Форма калькуляционной карты тыкните в ячейку выбрать, она красненькая)  
<EM><STRONG>Файл удален</STRONG> - велик размер - [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>
 
Вот, в предедущем почему то имя листбокса скинулось(((  
<EM><STRONG>Файл удален</STRONG> - велик размер - [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>
 
Вот я Лошара, наконец то вкурил)))  
Я при задании диапазона писал так  
AddresRange = "Справочник блюд!A3:B" & LastRowSBstring  
А надо было так  
AddresRange = "'Справочник блюд'!A3:B" & LastRowSBstring  
 
Всем большое спасибо за то что просветили в эти полезные функции!!!
 
1. Не хватает апострофов, нужно так:  
AddresRange = "='Справочник блюд'!A3:B" & LastRowSBstring  
Можно и без знака = (равно)  
AddresRange = "'Справочник блюд'!A3:B" & LastRowSBstring  
 
Чтобы не ошибаться введите в ячейку ссылку на необходимый лист и диапазон, а затем скопируйте и вставьте в код  
 
2. В post_166101.rar на форме ListBoxSpravochnikBlud, а есть ListBox1  
Было: ListBoxSpravochnikBlud.RowSource = AddresRange  
Долно быть: ListBox1.RowSource = AddresRange
 
Можно еще так задать источник:  
Private Sub ComboBox3_Change()  
UserForm3.ComboBox4.RowSource = ComboBox3.Value ' Устанавливается источник значений (список) для CB4 в зависимости от значения CB3. Значения CB3 присвоены именованным диапазонам со значениями для CB4.  
UserForm3.ComboBox4 = Empty ' Если меняется CB3, то ComboBox4 очищается  
End Sub  
Это похоже на зависимые выпадающие списки с двойной ссылкой.
 
Большое спасибо всем)  
Этап пройден) движемся к новым неизвестнастям)
 
Доброе утро Всем. Ребята подскажите пжл. а в ComboBox по умолчанию можно на моем примере чтоб первый столбец был установлен определенной ширины у меня там нумерация идет если это возможно.
С уважением Тиго.
 
В свойствах комбобокса введите для параметра ColumnWidth: 20;80 и нажмите Enter.  
В свойстве появится строка: 20 пт;80 пт , что отображает ширину столбцов в пойнтах
 
Супер спасибо
С уважением Тиго.
Страницы: 1
Читают тему
Наверх