[Michael Miazga[_2_]]

I know this HAS to be simple, but I can't find the command anywhere, driving
me crazy. I'm just trying to write to a cell the current date. only in
mm/dd/yyyy format. something like this, but it isn't right:

With curWks
.Range("J31").Clear
.Range("J31").Bold = True
.Range("J31").Text (Date)
End with

[Michael Miazga[_2_]]

God, I finally got it..

..Range("J31").Value = Date

works.

"Michael Miazga" wrote in message
...
I know this HAS to be simple, but I can't find the command anywhere,
driving
me crazy. I'm just trying to write to a cell the current date. only in
mm/dd/yyyy format. something like this, but it isn't right:

With curWks
.Range("J31").Clear
.Range("J31").Bold = True
.Range("J31").Text (Date)
End with

[Richard Choate]

Outside of the With statement:

ActiveCell = Format(Date, "mm/dd/yyyy")

Richard

"Michael Miazga" wrote in message
...
I know this HAS to be simple, but I can't find the command anywhere, driving
me crazy. I'm just trying to write to a cell the current date. only in
mm/dd/yyyy format. something like this, but it isn't right:

With curWks
.Range("J31").Clear
.Range("J31").Bold = True
.Range("J31").Text (Date)
End with

[Ryan Poth[_2_]]

Try replacing

..Range("J31").Text (Date)

with

..Range("J31").Value = Date

Regards,
Ryan

-----Original Message-----
I know this HAS to be simple, but I can't find the
command anywhere, driving
me crazy. I'm just trying to write to a cell the current
date. only in
mm/dd/yyyy format. something like this, but it isn't
right:

With curWks
.Range("J31").Clear
.Range("J31").Bold = True
.Range("J31").Text (Date)
End with



.