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

Вход

Регистрация

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

 

= Мир MS Excel/Привязать выбранные данные в комбоксе к ячейке "Дорога" - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Привязать выбранные данные в комбоксе к ячейке "Дорога"
parovoznik Дата: Суббота, 18.08.2018, 17:22 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 450
Репутация: 26 ±
Замечаний: 0% ±

Excel 2013
Добрый день.
Имеется форма для выбора станций состоящая из двух параметров :код станции , название станции. После выбора данные нужно перенести на форму отчет ,но уже должно отображаться три параметра : код,название и дорога.
Как подвязать ячейку "Дорога " (или данные в столбце А:А) базы данных к выбранному комбобоксу?
К сообщению приложен файл: 1558242.xlsm (24.8 Kb)
 
Ответить
СообщениеДобрый день.
Имеется форма для выбора станций состоящая из двух параметров :код станции , название станции. После выбора данные нужно перенести на форму отчет ,но уже должно отображаться три параметра : код,название и дорога.
Как подвязать ячейку "Дорога " (или данные в столбце А:А) базы данных к выбранному комбобоксу?

Автор - parovoznik
Дата добавления - 18.08.2018 в 17:22
_Boroda_ Дата: Воскресенье, 19.08.2018, 00:53 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 17006
Репутация: 6667 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Так нужно?
[vba]
Код
Private Sub UserForm_Initialize()
    Me.Caption = "Отчет" & "(" & Format(Now, "dd.mm.yyyy") & ")"
    Me.Label3.Caption = Cells(Test.ComboBox1.ListIndex + 2, 1)
End Sub
[/vba]
К сообщению приложен файл: 1558242_1.xlsm (20.9 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеТак нужно?
[vba]
Код
Private Sub UserForm_Initialize()
    Me.Caption = "Отчет" & "(" & Format(Now, "dd.mm.yyyy") & ")"
    Me.Label3.Caption = Cells(Test.ComboBox1.ListIndex + 2, 1)
End Sub
[/vba]

Автор - _Boroda_
Дата добавления - 19.08.2018 в 00:53
parovoznik Дата: Воскресенье, 19.08.2018, 19:13 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 450
Репутация: 26 ±
Замечаний: 0% ±

Excel 2013
_Boroda_, все верно. спасибо. :)
 
Ответить
Сообщение_Boroda_, все верно. спасибо. :)

Автор - parovoznik
Дата добавления - 19.08.2018 в 19:13
  • Страница 1 из 1
  • 1
Поиск:

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