Hi, i have been using this code to time stamp a particular cell:

Code:
Sub TimeStampOn()
   ActiveSheet.OnEntry = "Stamper"
End SubCode:
Sub Stamper()
   On Error Resume Next
       ActiveCell.ClearComments
   On Error GoTo 0
   ActiveCell.Range("A1").Value = Date + Time
End SubCode:
Sub TimeStampOff()
   ActiveSheet.OnEntry = ""
End Sub
The only trouble with this code was that it copied over whatever was in the selected cell... So someone helped me out with code that just adds to the selected cell which is much simpler:

ActiveCell.Value = ActiveCell.Value & Chr(10) & Date + Time
Now my problem is i need to do a calculation on these dates... With the old code i was able to minus one date from the other to get a number (of days)... with the new code ... when i do the same calculation i just get #VALUE!

Is there a way to get this working? also the old code did not display the seconds in the cell... (but it did display them in the bar at the top)... with the new code it displays the seconds in the cell (which i didnt want) and even if i format the cell to DD/MM/YYYY HH:MM... it still displays seconds can anyone help?