Create a time stamp from a date and vv
 

Help!
I want to write a udf in vba as function d2tstamp() and a function
tspam2d() which does just that.
I have it working combining data from different cells and letting excel
do the calculation but cannot get it to work in vba

Date to Timestamp:
Date: 12-12-2005
X = 38698.00 serial value for 12-12-2005
Y = 25569.00 serial value for 1-1-1970

Calculation: (X - Y) * 24 * 60 * 60 = 1134345600

Timestamp to Date:
Calculation: (Timestamp / 24 * 60 *60) + Y = 12-12-2005

All this looks perfect but when I put it in a vba code and run it it
doesn't want to work.
Does anybody have a sample code for me? Two sample codes?

:mad: :confused: :eek:


--
hhalle

Male
------------------------------------------------------------------------
hhalle's Profile: http://www.excelforum.com/member.php...o&userid=20829
View this thread: http://www.excelforum.com/showthread...hreadid=495634

Create a time stamp from a date and vv
 

This might be helpful:

http://www.mcgimpsey.com/excel/udfs/unixtoxltime.html

When you say "it doesn't want to work", what do you mean? Do you get the
wrong value? no value? an error? a run-time error? a crash?



In article ,
hhalle wrote:

Help!
I want to write a udf in vba as function d2tstamp() and a function
tspam2d() which does just that.
I have it working combining data from different cells and letting excel
do the calculation but cannot get it to work in vba

Date to Timestamp:
Date: 12-12-2005
X = 38698.00 serial value for 12-12-2005
Y = 25569.00 serial value for 1-1-1970

Calculation: (X - Y) * 24 * 60 * 60 = 1134345600

Timestamp to Date:
Calculation: (Timestamp / 24 * 60 *60) + Y = 12-12-2005

All this looks perfect but when I put it in a vba code and run it it
doesn't want to work.
Does anybody have a sample code for me? Two sample codes?

:mad: :confused: :eek:

Create a time stamp from a date and vv
 

Hi,

When I say it wont work is that I gat either a #VALUE! error of a
#NUMBER! error

When taking it step by step and including msgboxes to show the
intermediary results those are OK but the final returns the error.

Thanks for reading

Hans


--
hhalle

Male
------------------------------------------------------------------------
hhalle's Profile: http://www.excelforum.com/member.php...o&userid=20829
View this thread: http://www.excelforum.com/showthread...hreadid=495634