Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как заставить комбобокс выводить номер в списке? - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Как заставить комбобокс выводить номер в списке? (Макросы Sub)
Как заставить комбобокс выводить номер в списке?
Demitras Дата: Суббота, 15.02.2014, 21:09 | Сообщение № 1
Группа: Заблокированные
Ранг: Участник
Сообщений: 53
Репутация: 0 ±
Замечаний: 100% ±

Excel 2003
Как сделать так, чтоб комбобокс выводил номер значения из списка?
Например, в первом списке при выборе из "йцуке", например, "ц" в связаной ячейке будет ц.

А во втором нужно, чтобы при выборе из списка "qwert", например, "w" в связаной ячейке появлялось НЕ "w", а "2"

Подскажите, пожалуйста, как это сделать?
К сообщению приложен файл: 8072030.rar (21.8 Kb)


Сообщение отредактировал Demitras - Суббота, 15.02.2014, 23:00
 
Ответить
СообщениеКак сделать так, чтоб комбобокс выводил номер значения из списка?
Например, в первом списке при выборе из "йцуке", например, "ц" в связаной ячейке будет ц.

А во втором нужно, чтобы при выборе из списка "qwert", например, "w" в связаной ячейке появлялось НЕ "w", а "2"

Подскажите, пожалуйста, как это сделать?
Автор - Demitras
Дата добавления - 15.02.2014 в 21:09
ikki Дата: Суббота, 15.02.2014, 21:59 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
не п.4 ? :)

помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki
 
Ответить
Сообщениене п.4 ? :)
Автор - ikki
Дата добавления - 15.02.2014 в 21:59
Demitras Дата: Суббота, 15.02.2014, 22:05 | Сообщение № 3
Группа: Заблокированные
Ранг: Участник
Сообщений: 53
Репутация: 0 ±
Замечаний: 100% ±

Excel 2003
ikki, пардон)
 
Ответить
Сообщениеikki, пардон)
Автор - Demitras
Дата добавления - 15.02.2014 в 22:05
Demitras Дата: Воскресенье, 16.02.2014, 11:13 | Сообщение № 4
Группа: Заблокированные
Ранг: Участник
Сообщений: 53
Репутация: 0 ±
Замечаний: 100% ±

Excel 2003
Народ, что же по поводу моего вопроса?
Мне просто нужно в вба сделать так же как в прикрепленном файле (при выборе элемента из выпадающего списка, в связанной ячейке появлялся номер выбранного элемента).

Помогите, пожалуйста, очень нужно!

И, желательно, до абсурда простым способом :)
К сообщению приложен файл: 3820356.rar (15.7 Kb)


Сообщение отредактировал Demitras - Воскресенье, 16.02.2014, 11:15
 
Ответить
СообщениеНарод, что же по поводу моего вопроса?
Мне просто нужно в вба сделать так же как в прикрепленном файле (при выборе элемента из выпадающего списка, в связанной ячейке появлялся номер выбранного элемента).

Помогите, пожалуйста, очень нужно!

И, желательно, до абсурда простым способом :)
Автор - Demitras
Дата добавления - 16.02.2014 в 11:13
nilem Дата: Воскресенье, 16.02.2014, 12:25 | Сообщение № 5
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация: 563 ±
Замечаний: 0% ±

Excel 2013, 2016
Цитата Demitras, 16.02.2014 в 11:13, в сообщении № 4
до абсурда простым способом

вот вариант "после абсурда" :)
[vba]
Код
Private Sub UserForm_Initialize()
     Me.ComboBox1.List = Range("E6:E10").Value
     Me.ComboBox2.List = Range("J6:J10").Value
End Sub

Private Sub ComboBox1_Change()
     Range("H10").Value = Me.ComboBox1.Value
End Sub

Private Sub ComboBox2_Change()
     Range("L10").Value = Me.ComboBox2.ListIndex + 1
End Sub
[/vba]

Яндекс.Деньги 4100159601573
 
Ответить
Сообщение
Цитата Demitras, 16.02.2014 в 11:13, в сообщении № 4
до абсурда простым способом

вот вариант "после абсурда" :)
[vba]
Код
Private Sub UserForm_Initialize()
     Me.ComboBox1.List = Range("E6:E10").Value
     Me.ComboBox2.List = Range("J6:J10").Value
End Sub

Private Sub ComboBox1_Change()
     Range("H10").Value = Me.ComboBox1.Value
End Sub

Private Sub ComboBox2_Change()
     Range("L10").Value = Me.ComboBox2.ListIndex + 1
End Sub
[/vba]
Автор - nilem
Дата добавления - 16.02.2014 в 12:25
Demitras Дата: Воскресенье, 16.02.2014, 12:40 | Сообщение № 6
Группа: Заблокированные
Ранг: Участник
Сообщений: 53
Репутация: 0 ±
Замечаний: 100% ±

Excel 2003
nilem, спасибо большое!)
 
Ответить
Сообщениеnilem, спасибо большое!)
Автор - Demitras
Дата добавления - 16.02.2014 в 12:40
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Как заставить комбобокс выводить номер в списке? (Макросы Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!