Hide rows based on cell content

[garyi]

Hello all, I know this has been asked a lot of times, and I have tried as many varients as I can find on line with no luck.

I have a pop up box, with 5 choices. If one of those choices is selected then I need some rows to be hidden, I need this to happen automatically.

here is the code I have tried (amongst others)

Sub hidebreakfast()
Application.ScreenUpdating = False
Application.EnableEvents = False
If Range("C13").Value = "never" Then
Range("14:18").EntireRow.Hidden = True
    Else
Range("14:18").EntireRow.Hidden = False
End If
Application.ScreenUpdating = True
Application.EnableEvents = True
End Sub

In practice nothing happens, there is no error or anything, its just nothing happens.

I do not need to reference the pop up box if it helps, in another cell if never is picked then number 1 is displayed. But I could not work it from this either.

Many thanks