While executing the following code I am getting a message
"CANT EXECUTIVE CODE IN A BREAK MODE"

Sub FARAZCUT()
On Error GoTo ErrorHandler
Range("A4").End(xlDown).Select
ActiveCell.Offset(1, 0).Activate
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
Exit Sub ' Exit to avoid handler.
ErrorHandler:
MsgBox "Copy Something First!"
End Sub

What might be the reason?