PowerCenter
- PowerCenter 10.5
- All Products
Public Function FV( _ Rate As Double, _ nPeriods As Long, _ Payment As Double, _ PresentValue As Double, _ PaymentType As Long _ ) As Double Dim v As Double v = (1 + Rate) ^ nPeriods FV = -( _ (PresentValue * v) + _ (Payment * (1 + (Rate * PaymentType))) * ((v - 1) / Rate) _ ) End Function