"Application.Function.Text" doesn't work

[Robin Clay]

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

 

[papou]

Hi Robin
Use Application.WorksheetFunction instead

HTH
Cordially
Pascal

 

[Ron Rosenfeld]

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

Try:

copydate = Range("E20").Text


--ron

 

[Tom Ogilvy]

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