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?