If you're changing C5 as part of this event, then you probably need to disable events.
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Cells.Count > 1 Or .Value = "" Or .Column <> 3 Then Exit Sub
Application.EnableEvents = False 'if you're going to be changing C5
Select Case .Row
Case 2
Range("78:93").EntireRow.Hidden = (.Value = "No")
Case 3
Select Case .Value
Case "T3/T4"
Range("16:29,31:31,37:44,45:46,48:66,72:77,94:95,97:99,101:107,120:121,127:294").EntireRow.Hidden = True
Case "T1/T2"
Range("16:29").EntireColumn.Hidden = ([c5] = "No") 'Replace range accordingly
End Select
Case 4
Range("122:126").EntireRow.Hidden = (.Value = "No")
End Select
End With
Application.EnableEvents = True
End Sub
Bookmarks