Sorry,

I cant seem to be able reply to the response to my question.

I am using Microsoft 97.
All the variables are Dim as double

Sub Macro1()
Dim t1 As Double
t1 = 0.05
Call FunctCalc(t1)
End Sub

Sub FunctCalc(ttt)
Dim t2 As Double
t2 = (ttt + 1) ^ (1 / 12)
End Sub

t2 = 1.00407412390531

This is not the correct answer

Correct Answer = 1.00407412378365

Can anyone figure out what the problem is.

Thanks for your help