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

Вход

Регистрация

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

 

= Мир MS Excel/Повторно выбранное из списка внести в текстбокс - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Повторно выбранное из списка внести в текстбокс (Макросы/Sub)
Повторно выбранное из списка внести в текстбокс
Сергей13 Дата: Четверг, 17.10.2019, 02:55 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 290
Репутация: -3 ±
Замечаний: 0% ±

Excel 2016
Здравствуйте.
Ребята есть комбобокс, при выборе данных из списка они отображаются в текстбоксе.
Можно ли после ручного удаления данных в текстбоксе повторно внести ранее выбранное в комбобоксе данное.
К сообщению приложен файл: 1704827.xlsm(15.5 Kb)
 
Ответить
СообщениеЗдравствуйте.
Ребята есть комбобокс, при выборе данных из списка они отображаются в текстбоксе.
Можно ли после ручного удаления данных в текстбоксе повторно внести ранее выбранное в комбобоксе данное.

Автор - Сергей13
Дата добавления - 17.10.2019 в 02:55
K-SerJC Дата: Четверг, 17.10.2019, 07:50 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 477
Репутация: 84 ±
Замечаний: 0% ±

Excel 2013
добрый день!
можно, запустите процедуру Private Sub ComboBox1_Change() повторно


Благими намерениями выстелена дорога в АД.
 
Ответить
Сообщениедобрый день!
можно, запустите процедуру Private Sub ComboBox1_Change() повторно

Автор - K-SerJC
Дата добавления - 17.10.2019 в 07:50
RAN Дата: Четверг, 17.10.2019, 09:50 | Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 5176
Репутация: 1041 ±
Замечаний: 0% ±

2010
[vba]
Код
Private Sub ComboBox1_Change()
    TextBox1.Value = ComboBox1
End Sub

Private Sub ComboBox1_DropButtonClick()
    Static k As Boolean
    k = Not k
    If Not k Then ComboBox1_Change
End Sub
[/vba]


Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение[vba]
Код
Private Sub ComboBox1_Change()
    TextBox1.Value = ComboBox1
End Sub

Private Sub ComboBox1_DropButtonClick()
    Static k As Boolean
    k = Not k
    If Not k Then ComboBox1_Change
End Sub
[/vba]

Автор - RAN
Дата добавления - 17.10.2019 в 09:50
Сергей13 Дата: Четверг, 17.10.2019, 22:31 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 290
Репутация: -3 ±
Замечаний: 0% ±

Excel 2016
RAN, Благодарю!
Спасибо всем!
 
Ответить
СообщениеRAN, Благодарю!
Спасибо всем!

Автор - Сергей13
Дата добавления - 17.10.2019 в 22:31
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Повторно выбранное из списка внести в текстбокс (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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