Noget større end double 10E308 ?

>Sidder i excel 2003 og visual 6.3

Universitets opgave

Jeg sidder og koder som et gal på et projekt og mangler en type større end double

findes der en type som kan have mere indhold end double 10E308 ... jeg skal desværre op højere op og har brugt delayed calc og har udviklet en masse for at dividere passende steder så tallene bliver holdt nede - se eksemple


Ville gerne have en evt. en egne type - har dig




S = 100 000 000 ' en valuta
J = 5000 ' impliceret folk 

' for at undgå ! (fakultet) funktionen og potensfunktion
Public Function Sum2Hj(Sum2Hjz As Double, Sum2HjJ As Integer) As Double
    Dim lilleJ As Double: lilleJ = 0 ' svarer til (Z+S) ^0 /(LilleJ = 0)! = 1 :)
    Sum2Hj = 1
    lilleJ = 1
    While lilleJ <= Sum2HjJ
        Sum2Hj = Sum2Hj * ((Sum2Hjz + S) / lilleJ)
        lilleJ = lilleJ + 1
    Wend
End Function



Anyone have a clue for at better type ???