Привет ребят хочу чтобы вы меня поставили на правильный путь

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Привет ребят хочу чтобы вы меня поставили на правильный путь (Макросы/Sub)

kolyan2288

Дата: Воскресенье, 12.03.2017, 01:00 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 11

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Привет ребят хочу чтобы вы меня поставили на правильный путь реализации моей задумки. Excel 2016, делаю выпадающий список
Есть Лист со списком, назовем его list_2,
в нем таблица с двумя столбцами id и name
поле name Источник данных для списка назову его select
На листе list_1 вставляю список c источником select

Что я хочу, когда я выбираю значение из списка name, в правом столбце присваивалась его значение по id (которое в list_2).

пока что сделал тупо добавление name в правый столбец

[vba]

Код

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
    Application.EnableEvents = False
       If Target.Offset(0, 1) <> Target Then
            Target.Offset(0, 1) = Target
        End If
     Application.EnableEvents = True
End Sub

[/vba]

Скажите как правильно и возможно ли это реализовать? спасибо
[moder]Тема закрыта. Причина: нарушение п.п. 2 и 5f Правил форума[/moder]

Сообщение отредактировал Pelena - Воскресенье, 12.03.2017, 08:53

Ответить

Michael_S

Дата: Воскресенье, 12.03.2017, 04:18 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 2012

Репутация: 373 ±

Замечаний: 0% ±

Excel2016

Сообщение отредактировал Michael_S - Воскресенье, 12.03.2017, 04:18

Ответить

Страница 1 из 1
1