ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / combobox
11 сообщений из 11, страница 1 из 1
combobox
    #34511421
fantomm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
fantomm
Участник
Привет всем!

Вопрос следущего плана:

Нужно создать на листе в екселе множество полей со списком со своими значениями, причем эти значения имеют в себе некутурую цифру.
Например,
хлеб 10р.
молоко 20р.

При выборе из списка хлеба в ячейку А1 записывается "Хлеб", а в А2 "10р"

Подскажите как это можно реализовать!
...
Рейтинг: 0 / 0
08.05.2007, 09:17:47
| Ответить | Цитировать | Написать  
combobox
    #34511506
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
В VBA на лист на котором комбобокс добавте этот модуль

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Option Explicit
Private Sub ComboBox1_Change()
  Dim x As String, y As Variant
  x = ComboBox1.Text
  y = Split(x)
  Range("A1") = y( 0 )
  Range("A2") = y( 1 )
End Sub
Только в этом случае все элементы должны содержать именно один пробел и именно между названием и ценой если это нельзя выполнить выберите другой разделитель, например

хлеб/10р.
молоко топлёное/20р.
тогда

модуль такой

Option Explicit
Private Sub ComboBox1_Change()
Dim x As String, y As Variant
x = ComboBox1.Text
y = Split(x, "/")
Range("A1") = y(0)
Range("A2") = y(1)
End Sub
...
Рейтинг: 0 / 0
08.05.2007, 09:59:26
| Ответить | Цитировать | Написать  
combobox
    #34511512
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
Функция Split работает начиная с VBA 6.0, если у тебя более ранняя напиши, пришлю как исправить!
...
Рейтинг: 0 / 0
08.05.2007, 10:02:27
| Ответить | Цитировать | Написать  
combobox
    #34511534
fantomm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
fantomm
Участник
DeggasadФункция Split работает начиная с VBA 6.0, если у тебя более ранняя напиши, пришлю как исправить!

Скажите Deggasad а как заполнять или добавлять значения в combobox?
...
Рейтинг: 0 / 0
08.05.2007, 10:09:31
| Ответить | Цитировать | Написать  
combobox
    #34511551
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
fantomm DeggasadФункция Split работает начиная с VBA 6.0, если у тебя более ранняя напиши, пришлю как исправить!

Скажите Deggasad а как заполнять или добавлять значения в combobox?

В свойствах комбобокса ListFillRange -посмотри в примере
...
Рейтинг: 0 / 0
08.05.2007, 10:12:52
| Ответить | Цитировать | Написать  
combobox
    #34511581
fantomm
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
fantomm
Участник
Deggasad fantomm DeggasadФункция Split работает начиная с VBA 6.0, если у тебя более ранняя напиши, пришлю как исправить!

Скажите Deggasad а как заполнять или добавлять значения в combobox?

В свойствах комбобокса ListFillRange -посмотри в примере
Спасибо огромное за помощь!!!!!!
...
Рейтинг: 0 / 0
08.05.2007, 10:19:16
| Ответить | Цитировать | Написать  
combobox
    #34511606
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
Ещё раз перечитал вопрос Если комбобокс необязателен или нежелателен, то можно и без него. Пример на втором листе!
...
Рейтинг: 0 / 0
08.05.2007, 10:27:53
| Ответить | Цитировать | Написать  
combobox
    #34675887
valen24
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
valen24
Гость
Доброго дня!..
А можно поподробнее - что изображено на втором листе?...
свойства - не отккрываются - не понятнтно - это комбобокс или что-то другое?...
...
Рейтинг: 0 / 0
22.07.2007, 23:09:46
| Ответить | Цитировать | Написать  
combobox
    #34675898
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
valen24Доброго дня!..
А можно поподробнее - что изображено на втором листе?...
свойства - не отккрываются - не понятнтно - это комбобокс или что-то другое?...

Меню данные - проверка - список, если я правильно понял вопрос!
...
Рейтинг: 0 / 0
22.07.2007, 23:30:35
| Ответить | Цитировать | Написать  
combobox
    #34678516
valen24
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
valen24
Гость
Все правильно Вы поняли!!
И я тоже понял Вас - Спасибо огромное!!
...
Рейтинг: 0 / 0
23.07.2007, 21:43:48
| Ответить | Цитировать | Написать  
combobox
    #34703667
VovaNa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VovaNa
Участник
DeggasadМеню данные - проверка - список, если я правильно понял вопрос!
Присоединяюсь к благодарности)))
...
Рейтинг: 0 / 0
03.08.2007, 12:22:30
| Ответить | Цитировать | Написать  
11 сообщений из 11, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / combobox
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?desktop=1&fid=61&tid=2182513]:
 0ms
get settings:
 7ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 35ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 53ms
get tp. blocked users:
 2ms
others: 206ms
total:  325ms
созд. / загр.: 325ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]