Добрый день.
Требуется отобразить/скрыть строки в зависимости от значения из выпадающего списка.
Например: выпадающий список в ячейке B3, может принимать значения SS1, SS2, SS3...SS15
В столбце B3 под списком идет порядка 200 строк со значениями SS1...SS15
Требуется в соответствии со значением B3 оставить только строки, в которых значение равно значению в B3.
Спасибо.
Здравствуйте
Можно, например, так:Sub lDaNiLa1()
Dim i As Long, lr As Long
With ActiveSheet
lr = ActiveSheet.Cells(Rows.Count, 2).End(xlUp).Row
For i = 7 To lr
If .Cells(i, 2).Value = Range("b3") Then
.Rows(i).EntireRow.Hidden = True
End If
Next i
End With
End Sub