Edit a cell macro in Microsoft Visal Basic

[Sharpy]

Hi All:
Trying to edit a cell in Excel 2003 using Microsoft Visual Basic.
I have a cell in "F4" "=now()"
I have copied this cell "F4"
Then "Paste special/Paste - values" into same cell
Which results in say for example "7/9/2006 11:15:00 AM"
Now I'm tryin to write a macro to automatically remove the " 11:15:00 AM"
from the end.

Macro so far is
Range("F4").Select 'Selects the F4 cell
ActiveCell.X 'What is the command to put where the X is?
Thanks in advance for any help.
Cheers Sharpy

 

[Norman Jones]

Hi Sharpy,

Try:

'=============>>
Public Sub Tester001()

With Range("F4")
.NumberFormat = "dd/mm/yy"
.Value = Date
End With

End Sub
'<<=============

 

[Susan]

=now() will always give you the date AND time.
=today() will just give you the date.
susan

 

[Sharpy]

Thanks Norman that tip worked great
Cheers Sharpy