Maybe add this to the top:

If Target.Cells.Count > 1 Then Exit Sub