VBA Code error

[Bob@Sun]

In one worksheet i have created the following code, which adds date to
specific column when data is entered in colum A.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 1 Then
Target.Offset(0, 10).Value = Now()
End If
End Sub

The problem is that when trying to delete a whole row, error message pops-up.
Run-time error '1004'
Application-defined or object -defined error

When click "End" actually everthing is ok, the row has been deleted, but
was just wondering what is causing that error.

If anybody can help with this issue, it will be greatlly appreciated.

[Andy Pope]

Plase add code tags to your post.

Please Login or Register  to view this content.

[Bob@Sun]

Great!!!!

That worked just perfect.

Thanks alot!