Hi
I've a set a data with time in onle column and dta values in the others.
I would like to make a vb function that simultates a mathematical intergration, that is a vb function

Function integration(timerange as range, datarange as range,Result as double)

That does the following
Looping this while the cells in the rimerange <>"" 
dt=timerange(n+1)-timerange(n)
dV=datarange(n+1)-datarange(n)
Result=Result+dt*dV
Could you help me out with this?