Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.85/62: Рейтинг темы: голосов - 62, средняя оценка - 4.85
1 / 0 / 0
Регистрация: 24.02.2012
Сообщений: 41

Как c листа считать данные и заполнить ими ComboBox

27.02.2012, 18:31. Показов 12628. Ответов 20
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Как в vba c листа excel считать в combobox данные?
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
27.02.2012, 18:31
Ответы с готовыми решениями:

Считать данные с листа EXCEL в Listview. Выбор листа в Combobox
Как считать с листа Excel - где его имя - выбранное значение из combobox. Если я правильно понял то это событие ...

Есть 2 StringGrid в С++ Builder, и нужно взять оттуда данные и заполнить ими 3 StringGrid, как бы сложить 2 та
Код C++ void __fastcall TForm1::Button1Click(TObject *Sender) { int i,j; float p,p1; for (i = 0; i < 48; i++) { ...

Взять данные из базы MySQL, и заполнить ими определенный шаблон в Word-е
недавно начал писать приложение на C#. Суть его в том, чтобы взять данные из базы MySQL и заполнить ими определенный шаблон в ворде. В...

20
1712 / 579 / 76
Регистрация: 10.04.2009
Сообщений: 9,328
27.02.2012, 18:35
Visual Basic
1
Чего = ActiveDocument.ComboBox1.Value
Добавлено через 44 секунды
Цитата Сообщение от Ципихович Эндрю Посмотреть сообщение
ActiveDocument
сорри, это для моего любимого Ворда, Эксель по аналогии сделайте
0
 Аватар для Апострофф
9908 / 3924 / 742
Регистрация: 11.10.2011
Сообщений: 5,907
27.02.2012, 19:11
Выдели данные для ComboBox1 и запусти форму -
Visual Basic
1
2
3
4
Private Sub UserForm_Initialize()
  ComboBox1.ColumnCount = Selection.Columns.Count
  ComboBox1.List = Selection.Value
End Sub
А потом научимся указывать данные программно, если захочется, конечно
0
1712 / 579 / 76
Регистрация: 10.04.2009
Сообщений: 9,328
27.02.2012, 19:14
сказано же
Цитата Сообщение от merivi Посмотреть сообщение
c листа excel
что человека грузить
1
 Аватар для Апострофф
9908 / 3924 / 742
Регистрация: 11.10.2011
Сообщений: 5,907
27.02.2012, 19:24
Цитата Сообщение от Ципихович Эндрю Посмотреть сообщение
сказано же
Отдельно для буквоедов
Visual Basic
1
2
3
4
Private Sub UserForm_Initialize()
  ComboBox1.ColumnCount = ActiveSheet.UsedRange.Columns.Count
  ComboBox1.List = ActiveSheet.UsedRange.Value
End Sub
0
1712 / 579 / 76
Регистрация: 10.04.2009
Сообщений: 9,328
27.02.2012, 19:28
одним словом если для буквоедов
Цитата Сообщение от merivi Посмотреть сообщение
Как в vba c листа excel считать в combobox данные?
то ТС можно прочитать в двух ракурсах
одним слово чего распинаться, автор пусть смотрит, спрашивает
0
1 / 0 / 0
Регистрация: 24.02.2012
Сообщений: 41
27.02.2012, 19:30  [ТС]
а как с нескольких листов в 1 combobox считать данные?
0
1712 / 579 / 76
Регистрация: 10.04.2009
Сообщений: 9,328
27.02.2012, 19:34
вопрос номер 1 - Комбобокс где находится на форме или на листе?
0
1 / 0 / 0
Регистрация: 24.02.2012
Сообщений: 41
27.02.2012, 19:36  [ТС]
на форме
0
1712 / 579 / 76
Регистрация: 10.04.2009
Сообщений: 9,328
27.02.2012, 19:37
Цитата Сообщение от Апострофф Посмотреть сообщение
ComboBox1.List = ActiveSheet.UsedRange.Value
в правую часть вписать то что надо
1
 Аватар для Апострофф
9908 / 3924 / 742
Регистрация: 11.10.2011
Сообщений: 5,907
27.02.2012, 19:38
Цитата Сообщение от merivi Посмотреть сообщение
а как с нескольких листов в 1 combobox считать данные?
merivi, а следующим вопросом будет -
как оставить в комбобоксе только уникальные значения?
И как их отсортировать по алфавиту?
Ответь для начала - что значит c листа excel считать в combobox данные?
Со всего листа или с определенной области?
0
1 / 0 / 0
Регистрация: 24.02.2012
Сообщений: 41
27.02.2012, 19:43  [ТС]
на одном листе - 1 столбец, на втором - аналогично.
0
1712 / 579 / 76
Регистрация: 10.04.2009
Сообщений: 9,328
27.02.2012, 19:55
долгоиграющая пластинка
Цитата Сообщение от Ципихович Эндрю Посмотреть сообщение
в правую часть вписать то что надо
Добавлено через 57 секунд
то есть следующий вопрос как
Цитата Сообщение от Ципихович Эндрю Посмотреть сообщение
вписать то что надо
0
1 / 0 / 0
Регистрация: 24.02.2012
Сообщений: 41
27.02.2012, 19:56  [ТС]
да да
0
1712 / 579 / 76
Регистрация: 10.04.2009
Сообщений: 9,328
27.02.2012, 20:04
Visual Basic
1
2
3
4
5
6
7
'Количество листов в книге
    ЧислоЛистов = Worksheets.Count
 
    'Цикл перебора листов
    For i = 1 To ЧислоЛистов
        Set sh = Worksheets(i)
Next
как с листа нужное брать надо?

Добавлено через 4 минуты
долго думаете
Visual Basic
1
2
'значение ячейки Excel без пробелов в начале и в конце ячейки
Значение = Trim(Worksheets("Лист1").Range("c1").Value)
0
1 / 0 / 0
Регистрация: 24.02.2012
Сообщений: 41
27.02.2012, 20:05  [ТС]
все ок!!! Спасибо!!!!!
0
 Аватар для Апострофф
9908 / 3924 / 742
Регистрация: 11.10.2011
Сообщений: 5,907
27.02.2012, 20:11
Какая идилия! Всем всё понятно!
А как же мы? Ну те то есть, кто не понял, как с несколькиз листов запихнуть данные в один комбобоксО_о
0
1712 / 579 / 76
Регистрация: 10.04.2009
Сообщений: 9,328
27.02.2012, 20:15
Цитата Сообщение от Апострофф Посмотреть сообщение
как с несколькиз листов запихнуть данные в один комбобокс
придёт Дюк и скажет - создайте свою тему, ОК?
0
27.02.2012, 20:26

Не по теме:

Цитата Сообщение от Ципихович Эндрю Посмотреть сообщение
придёт Дюк и скажет - создайте свою тему, ОК?
Обрати внимание, Эндрю, эдесь не было ни одной созданной мной темы!
И на разницу весовых категорий! Я гораздо реже брежу, может в этом разница?

0
27.02.2012, 20:30
Лучший ответ Сообщение было отмечено как решение

Решение

Не по теме:

Перечитал тему, но мало что понял.
Такое ощущение что merivi и Ципихович Эндрю пьяны - каждый о своем, но друг друга отлично поняли... %-)

3
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
27.02.2012, 20:30
Помогаю со студенческими работами здесь

Заполнить ComboBox значениями из листа
Как заполнить ComboBox значениями из листа и\или внести сам лист(его название) в ComboBox?

Заполнить ComboBox данными из листа Excel
Как сделать, чтобы список составлялся из данных на листе ексель, при этом данные могут прибавляться

Считать с листа Excel данные в массив
На листе Excel есть некие структурированные данные Столбцов может быть до 300 Строк более 150 000 С листа работать - невозможно в...

Данные в ComboBox из определенного листа Excel
Здравствуйте! Помогите, нужно чтобы данные из определенного листа Excel вставлялись в ComboBox формы, как сделать так? спасибо!

Считать данные с ComboBox
Доброго времени суток. Подскажите пожалуйста, как считать данные с комбо бокса? Пытаюсь сделать так, но считывает только количество записей...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
Вывод данных через динамический список в справочнике
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Функция заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются
Maks 31.03.2026
1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
Перемещение выделенных строк ТЧ из одного документа в другой
Maks 31.03.2026
Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave
DevAlt 30.03.2026
Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru