Private Sub Worksheet_Change(ByVal Target As Range)

[Solved]

[I created a drop down list and defaulted it to No. If the value is Y, it unhides the cells. I also had to add code for unprotecting/protecting sheet since it was protected.]
**********************
I cannot get this code to work.

What I want to do is to have rows 35-36, 40-41 and 45-46 unhidden when age is 50 or greater. By default on my inputs screen I have these rows hidden.
I have an inputs screen on my workbook and I use a "reset inputs" macro so the cell for calculated age has to be referenced.

cell b5= date of birth
Cell b6=by13 and cell b6 is protected since it is a calculated age
Cell BX13 = year(b5)
Cell BY13 =IF(YEAR(BW13)-BX13>100,0,YEAR(BW13)-BX13)

This code does not "unhide" my rows 35-36, 40-41 and 45-46 when calculated age is 50 or greater. Note, I need to combine it with the other code for b19 which already worked.

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address(0, 0) = "BY6" Then
    If Target.Value > "49" Then Rows("35:36,40:41,45:46").EntireRow.Hidden = False
End If
If Target.Address(0, 0) = "B19" Then
    If Target.Value = "" Then Range("B20:B23").ClearContents
End If
End Sub

Thanks
Hank