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

Вход

Регистрация

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

 

= Мир MS Excel/Отлавливание событий - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Отлавливание событий (Макросы/Sub)
Отлавливание событий
PaLbI4 Дата: Понедельник, 23.06.2014, 18:42 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день! Подскажите пожалуйста есть файл ( прикрепил)
есть вопрос на него ответ да или нет
но в следующей строке если ответ "да" то должно появляться поле комментарий и ячейка под изменение
если ответ нет то 2 нижних ячейки скрываются
К сообщению приложен файл: 6156378.xlsx (9.0 Kb)
 
Ответить
СообщениеДобрый день! Подскажите пожалуйста есть файл ( прикрепил)
есть вопрос на него ответ да или нет
но в следующей строке если ответ "да" то должно появляться поле комментарий и ячейка под изменение
если ответ нет то 2 нижних ячейки скрываются

Автор - PaLbI4
Дата добавления - 23.06.2014 в 18:42
wild_pig Дата: Понедельник, 23.06.2014, 19:44 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 517
Репутация: 97 ±
Замечаний: 0% ±

2003, 2013
Скрыть / отобразить строку в зависимости от ответа
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
     If Intersect(Target, [c2]) Is Nothing Then Exit Sub
     If [c2] = "да" Then Rows(3).Hidden = False
     If [c2] = "нет" Then Rows(3).Hidden = True
End Sub
[/vba]
К сообщению приложен файл: 4376900.xlsm (14.9 Kb)
 
Ответить
СообщениеСкрыть / отобразить строку в зависимости от ответа
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
     If Intersect(Target, [c2]) Is Nothing Then Exit Sub
     If [c2] = "да" Then Rows(3).Hidden = False
     If [c2] = "нет" Then Rows(3).Hidden = True
End Sub
[/vba]

Автор - wild_pig
Дата добавления - 23.06.2014 в 19:44
PaLbI4 Дата: Вторник, 24.06.2014, 12:57 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Отлично! То что нужно! Спасибо
 
Ответить
СообщениеОтлично! То что нужно! Спасибо

Автор - PaLbI4
Дата добавления - 24.06.2014 в 12:57
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Отлавливание событий (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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