At first I got an error which I was able to correct by adding the line "Dim KeyCells As Range". At this point this appears to insert the date and time (I am using Now() formatted to m/d/yyyy h:mm AM/PM).

If this works like I think it is this would be exactly what I wanted. Thanks for your help.