CopyDate = Format(Range("E20").Value2, "dd/mm/yyyy hh:mm")

--
Regards,
Tom Ogilvy


"Robin Clay" wrote in message
...
Greetings!

Cell E20 contains =NOW()
and the format is set to "dd/mm/yyyy hh:mm"
which is what I want to use in my VBA Code

CopyDate = Range("E20").Value
gives Copydate in the format "dd/mm/yyyy hh:mm:ss,
but that is not what I want.

CopyDate = Application.Function.Text((Range
("E20").Value), "dd/mm/yyyy hh:mm")
generates a 438 error - Object doesn't support this
property or method

How can I overcome this?


RClay AT haswell DOT com