This modified code seems to work.... Public Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 Then 'Application.EnableEvents = False On Error GoTo Errorhandler Target.Offset.Offset(0, 13) = Now() 'Application.EnableEvents = True End If Errorhandler: End Sub
Norman On Fri, Jul 17, 2009 at 3:36 PM, Pogster <pogs...@gmail.com> wrote: > > Hey all, > > I found a very simple macro to track any changes made to any cell in a > row by datestamping the end of the row. > The issue comes in whenever i try to insert a row into the sheet, i > get an error: "Runtime Error 1004, Application-defined or Object- > defined error" and im not sure how to fix this. > > Here is a sample of my code: > > Public Sub Worksheet_Change(ByVal Target As Range) > If Target.Column = 1 Then > Application.EnableEvents = False > Target.Offset.Offset(0, 13) = Now() > Application.EnableEvents = True > End If > End Sub > > > Could anyone please point me in the right direction, how can i keep > this functionality and still be able to insert new rows into my > sheet? > > Thanks in advance! > > Best Regards, > Pogster > > > > --~--~---------~--~----~------------~-------~--~----~ ---------------------------------------------------------------------------------- Some important links for excel users: 1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at http://www.excelitems.com 2. Excel tutorials at http://www.excel-macros.blogspot.com 3. Learn VBA Macros at http://www.vbamacros.blogspot.com 4. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com If you find any spam message in the group, please send an email to: Ayush Jain @ jainayus...@gmail.com or Ashish Jain @ 26may.1...@gmail.com <><><><><><><><><><><><><><><><><><><><><><> HELP US GROW !! We reach over 5,000 subscribers worldwide and receive many nice notes about the learning and support from the group. Our goal is to have 10,000 subscribers by the end of 2009. Let friends and co-workers know they can subscribe to group at http://groups.google.com/group/excel-macros/subscribe -~----------~----~----~----~------~----~------~--~---