Hallo Zusammen,
ich habe ein kleines Problem in VB und hoffe, dass ihr mir dabei helfen könnt.
Ich würde gerne den IRR von einem bestimmten Zeitraum errechnen lassen und wollte dazu die Excel-Funktion "XIRR()" nutzen.
Hier mein Code:
Mein Problem ist nun, dass die Funktion XIRR nicht funktioniert.
Ich erhalte die Fehlermeldung: "Die Xirr-Methode des WorksheetFunction-Objektes konnte nicht ausgeführt werden." mit dem ErrorCode: -2146827284
Die "Average"-Funktion hingegen funktioniert ohne Probleme.
Das ".ToOADate" habe ich genutzt, weil in einer Doku stand, dass das DateTime Format bei externen Programmen Probleme verursachen kann.
Kann mir hier bitte jemand weiterhelfen? Ich komme zurzeit zur keiner Lösung.
Vielen Dank schonmal!
ich habe ein kleines Problem in VB und hoffe, dass ihr mir dabei helfen könnt.
Ich würde gerne den IRR von einem bestimmten Zeitraum errechnen lassen und wollte dazu die Excel-Funktion "XIRR()" nutzen.
Hier mein Code:
VB.NET-Quellcode
-
- Dim cXLS As Excel.Application
- Dim valArr(2) As Double
- Dim datArr(2) As Double
- Dim val As Double = 10
- Dim res As Double
- valArr(0) = -10000
- valArr(1) = 500
- valArr(2) = 500
- datArr(0) = New DateTime(2016, 1, 1).ToOADate
- datArr(1) = New DateTime(2016, 2, 1).ToOADate
- datArr(2) = New DateTime(2017, 1, 1).ToOADate
- Try
- cXLS = New Excel.Application
- res = cXLS.WorksheetFunction.Average(1, 3) '=> Funktioniert ohne Probleme und gibt 2 zurück
- res = cXLS.WorksheetFunction.Xirr(valArr, datArr, val)
- MsgBox(res)
- Catch ex As Exception
- MsgBox(ex.Message)
- End Try
Mein Problem ist nun, dass die Funktion XIRR nicht funktioniert.
Ich erhalte die Fehlermeldung: "Die Xirr-Methode des WorksheetFunction-Objektes konnte nicht ausgeführt werden." mit dem ErrorCode: -2146827284
Die "Average"-Funktion hingegen funktioniert ohne Probleme.
Das ".ToOADate" habe ich genutzt, weil in einer Doku stand, dass das DateTime Format bei externen Programmen Probleme verursachen kann.
Kann mir hier bitte jemand weiterhelfen? Ich komme zurzeit zur keiner Lösung.
Vielen Dank schonmal!