adding cumpimt

[mstephen]

Still searching for answer. Does anyone know if there is a way to add the excel financial function "cumipmt" to access? If so what is the process? I've checked the excel object library 11.0 in the references and still nothing. I've tried a number of formulas/equations. The only accurate calculation is the cumipmt function.

 

[boblarson]

Still searching for answer. Does anyone know if there is a way to add the excel financial function "cumipmt" to access? If so what is the process? I've checked the excel object library 11.0 in the references and still nothing. I've tried a number of formulas/equations. The only accurate calculation is the cumipmt function.

I gave you the answer in the other thread. You have to use that code that is on the MS site which opens the Analysis Addin first.

 

[gemma-the-husky]

try IPMT function - looks like it serves the same purpose

 

[mstephen]

It does up to a period, what it doesn't do is give a start & end period together, which gives you the cumulative version of ipmt. I a little stuck on the suggestion of calling the excel functions to access.

 

[boblarson]

You need to use this code (okay I'll explicitly write it out - copied from the link I had provided):

Sub xlAddin()
   Dim objExcel As Excel.Application
   Set objExcel = CreateObject("Excel.Application")

   ' Opens the add-in, which is in the Analysis folder of the
   ' Excel Library Directory.
   objExcel.workbooks.Open (objExcel.Application.librarypath & _
      "\Analysis\atpvbaen.xla")

   ' Runs the AutoOpen macro in the add-in
   objExcel.workbooks("atpvbaen.xla").RunAutoMacros (xlAutoOpen)
   MsgBox objExcel.Application.Run("atpvbaen.xla![COLOR="Red"]cumipmt", rate, start_period, end_period, type)[/COLOR]
   objExcel.Quit
   Set objExcel = Nothing
End Sub

You'll need to modify the part in the Message Box to add the parameters and change it from going to a message box but to what you need.