Combine 2 worksheet change events

Hi
Get rid of red part from Your code

Private Sub Worksheet_Change(ByVal Target As Range)
If [l7] = "Yes" Then
Sheets("Mobile Tower checklist p10").Visible = True
Else
Sheets("Mobile Tower checklist p10").Visible = False
End If
Private Sub Worksheet_Change(ByVal Target As Range)
If [l6] = "Yes" Then
Sheets("LIFT PLAN").Visible = True
Else
Sheets("LIFT PLAN").Visible = False
End If
End Sub