Modifying code "If Not Intersect" with Else (2007)

Good day (Happy Halloween),
Just looking for help to modifying the following code to “Clear” the content if my Column A (5to20) is deleted to remove whatever is in the selected row.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rcell As Range
'This function adds a the HS ID of the user to a hidden column (N)
If Not Intersect(Target, Range("A5:A20")) Is Nothing Then
For Each rcell In Intersect(Target, Range("A5:A20")).Cells
If Len(rcell.Value) > 0 Then
Cells(Target.Row, "N") = "hs631"
rcell.Select
End If
Next rcell
End If
End Sub

Works well but I would need it to clear the content at Cells(Target.Row, "N") = "hs631" if the information from Target, Range("A5:A20") is deleted.