I have a macro that basically put current date in a cell

Dim d As Date
Dim s As String
Sheets("New Ren Data").Select
Range("a65001").Select

d = Now()
s = d
Selection.FormulaR1C1 = s

However the problem is that when I look at the value in the formula bar

its shows say for eg. today is 02/08/2006 09:43:2
It should show. 08/02/2006 instead.


any suggestions why ITs doing wrong?