unhide rows based on data validation
On 5 Jun., 20:20, cathy wrote:
I have a data validation list in cell $E$30 of either "0" or "1".
If the user selects "0" I want to hide rows 144 - 238.
If the user selects "1" I want rows 144-238 to appear.
I tried the following code - but it didn't seem to work. *Any help is
appreciated.
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Range("E30").Value = "0" Then
* *Range(Rows(144), Rows(238)).EntireRow.Hidden = True
ElseIf Range("E30").Value = "1" Then
* *Range(Rows(144), Rows(238)).EntireRow.Hidden = False:
End If
Application.ScreenUpdating = True
End Sub
--
Cathy
Hi Cathy
Try this:
Private Sub Worksheet_Change(ByVal Target As Range)
Set isect = Intersect(Target, Range("E30"))
If Not isect Is Nothing Then
If Target.Value = 0 Then
Range("A144:A238").EntireRow.Hidden = True
Else
Range("A144:A238").EntireRow.Hidden = False
End If
End If
End Sub
Regards,
Per
|