Date format problem

[Terence]

Hi,

Whenever my workbook opens, I assign the current date
value to a cell by using:

Sheets("Data").Cells(5,7).Value = Date

In my computer, it shows "8/12/2003". But I am afraid that
the date format varies in other users' computers. Is there
anything I can do on the macro coding that I can force
returned date format on the cell to be mm/dd/yyyy ?
Thanks a lot!

Terence

 

[Myrna Larson]

In case you may need to use the date in calculations,

With Sheets("Data").Cells(5, 7)
.Numberformat = "mm/dd/yyyy"
.Value = Date
End With