Simple Worksheet_Change Event Syntax Check

Trying to 1) remove the hyperlink, and 2) format paint (.PasteSpecial xlPasteFormats) a preferred non-contiguous range upon enter-click after entry of an e-mail address, that by default, jumps to Excel's normal style. Cannot get it to work. Help appreciated.

Private Sub Worksheet_Change(ByVal Target As Range)
    
    If Target.Cells.Count > 1 Or IsEmpty(Target) Then Exit Sub
        If Target.Address = "$L$48" Then
            On Error Resume Next
                Application.EnableEvents = False
                    Target.Hyperlinks.Delete
                    Range("L36").Copy
                    Target.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
                                         SkipBlanks:=False, Transpose:=False
                    Application.CutCopyMode = False
                Application.EnableEvents = True
            On Error GoTo 0
        End If
        
End Sub