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

Вход

Регистрация

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

 

= Мир MS Excel/Автовыбор в другом выпадающем списке - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Автовыбор в другом выпадающем списке (Формулы/Formulas)
Автовыбор в другом выпадающем списке
ivanov1974 Дата: Суббота, 28.02.2015, 15:29 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 149
Репутация: 1 ±
Замечаний: 0% ±

Здравствуйте знатоки Excel. Прошу помочь в ситуации. Есть два выпадающих списка в ячейках С43 и С152. Есть ли возможность, чтобы при выборе из С43, в ячейке С152 автоматически выбиралось это же хозяйство, но возможность выбора другого хозяйства в С152 тоже сохранялась.
К сообщению приложен файл: 6384370.rar (35.2 Kb)
 
Ответить
СообщениеЗдравствуйте знатоки Excel. Прошу помочь в ситуации. Есть два выпадающих списка в ячейках С43 и С152. Есть ли возможность, чтобы при выборе из С43, в ячейке С152 автоматически выбиралось это же хозяйство, но возможность выбора другого хозяйства в С152 тоже сохранялась.
Автор - ivanov1974
Дата добавления - 28.02.2015 в 15:29
gling Дата: Суббота, 28.02.2015, 16:07 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2643
Репутация: 739 ±
Замечаний: 0% ±

2010
Здравствуйте. Так устроит?
К сообщению приложен файл: 7236630.xls (70.0 Kb)

ЯД-41001506838083
 
Ответить
СообщениеЗдравствуйте. Так устроит?
Автор - gling
Дата добавления - 28.02.2015 в 16:07
Serge_007 Дата: Суббота, 28.02.2015, 16:08 | Сообщение № 3
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Можно макросом:[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
     If Target.Cells.Count > 1 Then Exit Sub

     If Target.Cells = [c43] Then
         Application.EnableEvents = False
         With Target
             With .Offset(109, 0)
                 .Value = [c43]
             End With
         End With
         Application.EnableEvents = True
     End If
End Sub
[/vba]
К сообщению приложен файл: ivanov1974.xls (92.0 Kb)

ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеМожно макросом:[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
     If Target.Cells.Count > 1 Then Exit Sub

     If Target.Cells = [c43] Then
         Application.EnableEvents = False
         With Target
             With .Offset(109, 0)
                 .Value = [c43]
             End With
         End With
         Application.EnableEvents = True
     End If
End Sub
[/vba]
Автор - Serge_007
Дата добавления - 28.02.2015 в 16:08
ivanov1974 Дата: Суббота, 28.02.2015, 16:36 | Сообщение № 4
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 149
Репутация: 1 ±
Замечаний: 0% ±

gling, Serge_007, спасибо огромное. Вопрос закрыт. Вернее остался один открыт. Не повышается репутация Serge_007
 
Ответить
Сообщениеgling, Serge_007, спасибо огромное. Вопрос закрыт. Вернее остался один открыт. Не повышается репутация Serge_007
Автор - ivanov1974
Дата добавления - 28.02.2015 в 16:36
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Автовыбор в другом выпадающем списке (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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