excluding rows in select case with vba

[DeezNuts]

I am trying to make is so this script will ignore rows 1 through 5 but work on any >5

So basically I am trying to get this script to ignore the entire first 5 rows all the way across from A1:XFD5

Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Column
    Case Is = 4, 10, 16, 22, 28
Application.EnableEvents = False
        If Target.Value >= "0" Then
        Target.Offset(0, -1).Value = Now
        Target.Offset(1, -1).Value = "Submitted"
    Else
        Target.Offset(1, -1).Value = "Not Submitted"
    End If
    Application.EnableEvents = True
End Select
End Sub

I tried to add Case .Row >5 under Case Is = but that did not do it. Any and help is welcome.

 

[Danerida]

Private Sub Worksheet_Change(ByVal Target As Range)
If target.row >5 then
Select Case Target.Column
    Case Is = 4, 10, 16, 22, 28
Application.EnableEvents = False
        If Target.Value >= "0" Then
        Target.Offset(0, -1).Value = Now
        Target.Offset(1, -1).Value = "Submitted"
    Else
        Target.Offset(1, -1).Value = "Not Submitted"
    End If
    Application.EnableEvents = True
End Select
End If
End Sub

 

[DeezNuts]

Awesome thank you, was certainly over thinking this one.