Put comma by copy paste in Worksheet Change

Hi All,

I've been working with a project, the user wants to have a comma at the end once he input a value in a cell from Column A to C, I already did that. Somehow, he wants it also working once he copy/cut paste a value in a same column. Here is the piece of code that I am working.

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False

 If Intersect(Target, Range("A3:Z1000")) Is Nothing Then Exit Sub
 On Error Resume Next
    Application.EnableEvents = False
    Target = Target & ","
    Application.EnableEvents = True

End Sub