Добрый день, есть тест c выбором ответов с помощью переключателя и галочек, подсчет балов происходит с двух строках выделенных цветов, которые я скрыл:
Код |
---|
Sub HideByConditionalFormattingColor()
Dim cell As Range
Application.ScreenUpdating = False
For Each cell In ActiveSheet.UsedRange.Columns(1).Cells
If cell.DisplayFormat.Interior.Color = Range("O2").DisplayFormat.Interior.Color Then cell.EntireRow.Hidden = True
Next
Application.ScreenUpdating = True
End Sub
Sub ShowByConditionalFormattingColor()
Columns.Hidden = False
Rows.Hidden = False
End Sub
|
Скажите, как дописать макрос, чтобы показать строки возможно было после проставления всех галочек и переключателей. Спасибо!