Создать кнопку
Нажмите Вставить -> фигуры-> прямоугольник
Нарисуйте прямоугольник и введите show, нарисуйте еще один прямоугольник и введите hide
Предположим (строка 6 содержит ответ)
создать два макроса
- Щелкните вкладку «Разработчик» -> «Записать макрос»
укажите имя макроса « скрыть » нажмите ОК
Выберите строку 6, щелкните правой кнопкой мыши и выберите Скрыть и щелкните остановить запись на вкладке разработчика
Щелкните правой кнопкой мыши скрыть (кнопка) -> назначить макрос -> скрыть, нажать ОК
Щелкните вкладку «Разработчик» -> «Записать макрос»
укажите имя макроса « показать », нажмите «ОК»
Показать строку 6 и нажмите остановить запись .
Щелкните правой кнопкой мыши «Показать» (кнопка) -> назначить макрос -> показать, нажмите «ОК»
Код будет
Sub show()
Rows("6:6").Select
Selection.EntireRow.Hidden = False
Range("F5").Select
End Sub
Sub hide()
Rows("6:6").Select
Selection.EntireRow.Hidden = True
Range("F5").Select
End Sub
Сохраните файл с расширением .xlsm.
Нажмите «Показать и скрыть», альтернативно отобразит и скроет строку в Excel