View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Ron Rosenfeld
 
Posts: n/a
Default Cell display is 38727.4101273148 Formula Bar is 1/10/2006 9:50

On Tue, 10 Jan 2006 07:28:02 -0800, Dennis
wrote:

Excel 2003


I populate a cell with Now() (via the VBA line next)

With Sheets("Error Cells").Cells(Rows.count, 1).End(xlUp) _
(2, 1).Value = Now()

In the cell itself the display is: 38727.4101273148
even though the custom format assigned is: m/d/yyyy h:mm

Interestingly, the presentation in the Formula Bar is:
1/10/2006 9:50:35 AM which is exactly want I want in
the cell presentation; what am I doing wrong?

I have attempted to change the cell format to no avail.

Thanks

Dennis


From here it looks as if you are missing a "new line":

With Sheets("Sheet1").Cells(Rows.Count, 1).End(xlUp) _
(2, 1)
.Value = Now()


end with
--ron