Home / Forum / Allgemeine Foren / Investitionsrechnung / Excel Interner Zinsfuß in VBA programmieren (Gesamt-IRR)

Excel Interner Zinsfuß in VBA programmieren (Gesamt-IRR)

Anzeige

RS Controlling-System: Das RS- Controlling-System bietet Planung, Ist- Auswertung und Forecasting in einem Excel-System. Monatliche und mehrjährige Planung. Ganz einfach Ist- Zahlen mit Hilfe von Plan/Ist-Vergleichen, Kennzahlen und Kapitalflussrechnung analysieren. Im Rahmen der Vorschaurechnung (Forecasting) können Sie neben Ihren Plan- und Ist-Werten auch das auf Basis der derzeitigen Erkenntnisse basierende Jahresergebnis hochrechnen.  

Preis: 238,- EUR  Alle Funktionen im Überblick >>.

Login  Registrieren  Suchen  User  Regeln 
Neues Thema in folgender Kategorie
Forum » Allgemeine Foren » Investitionsrechnung
Seiten: 1
Antworten
Excel Interner Zinsfuß in VBA programmieren (Gesamt-IRR)
1.
01.06.2014 18:34:13
Hallo,

ich möchte gerne den Internen Zinsfuß in Excel in VBA programmieren.
Excel verwendet diese Gleichung: http://office.microsoft.com/de-de/excel-help/xintzinsfuss-HP005209341.aspx
Nur ich möchte dass die Gleichung die Renditen nicht annualisiert (1/365) sondern den gesamten
Internen Zinsfuß der gesamten Periode angibt.
Leider kann ich nicht VBA programmieren, könnte mir da jmd helfen?

Grüße,
Popoff
 
 
2.
02.06.2014 12:01:35
=tadXINTZINSFUSS(Werte;Zeitpkte;Schätzwert;Compoundierung)

Compoundierung

1 = Jahr
1/2 = Halbjahres
1/4 = vierteljährlich
1/12 = monatlich
1/52 = wöchentlich
1/365 = täglich
0 = unendlich
2 = zweijährig

-----------------------------------------------------------------

[CODE]
Public Function tadEFFEKTIV(ByVal zins As Double, ByVal compoundierung As Double)
If compoundierung = 0 Then
tadEFFEKTIV = Exp(zins) - 1
Else
tadEFFEKTIV = (1 + zins * compoundierung) ^ (1 / compoundierung) - 1
End If
End Function

Public Function tadABF(ByVal zins As Double, ByVal N As Double, ByVal compoundierung As Double)
tadABF = (1 + tadEFFEKTIV(zins, compoundierung)) ^ (-N)
End Function

Public Function tadABFbar(ByVal zins As Double, ByVal N As Double, ByVal compoundierung As Double)
If (compoundierung = 0) Then
tadABFbar = -N * tadABF(zins, N, compoundierung)
Else
tadABFbar = -N / compoundierung * tadABF(zins, N, compoundierung)
End If
End Function

Public Function tadKAPITALWERT(ByVal zins As Double, ByVal werte As Range, ByVal zeitpkte As Range, ByVal compoundierung As Double) As Double

Dim rCell As Range
Dim i As Long
Dim t As Double
Dim npv As Double
Dim werteArr() As Double
Dim zeitpkteArr() As Long

ReDim werteArr(werte.Count - 1)
ReDim zeitpkteArr(werte.Count - 1)

i = 0
For Each rCell In werte.Cells
werteArr(i) = rCell.Value
i = i + 1
Next rCell

i = 0
For Each rCell In zeitpkte.Cells
zeitpkteArr(i) = rCell.Value
i = i + 1
Next rCell

npv = 0

For i = 0 To werte.Count - 1
t = (zeitpkteArr(i) - zeitpkteArr(0)) / 365
npv = npv + werteArr(i) * tadABF(zins, t, compoundierung)
Next i

tadKAPITALWERT = npv
End Function

Public Function tadKAPITALWERTbar(ByVal zins As Double, ByVal werte As Range, ByVal zeitpkte As Range, ByVal compoundierung As Double) As Double

Dim rCell As Range
Dim i As Long
Dim t As Double
Dim npv As Double
Dim werteArr() As Double
Dim zeitpkteArr() As Long

ReDim werteArr(werte.Count - 1)
ReDim zeitpkteArr(werte.Count - 1)

i = 0
For Each rCell In werte.Cells
werteArr(i) = rCell.Value
i = i + 1
Next rCell

i = 0
For Each rCell In zeitpkte.Cells
zeitpkteArr(i) = rCell.Value
i = i + 1
Next rCell

npv = 0

For i = 0 To werte.Count - 1
t = (zeitpkteArr(i) - zeitpkteArr(0)) / 365
npv = npv + werteArr(i) * tadABFbar(zins, t + compoundierung, compoundierung)
Next i

tadKAPITALWERTbar = npv
End Function

Public Function tadXINTZINSFUSS(ByVal werte As Range, ByVal zeitpkte As Range, ByVal guess As Double, ByVal compoundierung As Double) As Double
Dim f As Double
Dim fbar As Double
Dim x As Double
Dim x0 As Double
Dim i As Integer
Dim found As Integer

found = 0
x0 = guess

Do While (i < 100)

f = tadKAPITALWERT(x0, werte, zeitpkte, compoundierung)
fbar = tadKAPITALWERTbar(x0, werte, zeitpkte, compoundierung)

If (fbar = 0) Then
tadXINTZINSFUSS = (0) ^ (-1)
Else
x = x0 - f / fbar
End If

If (Abs(x - x0) < 0.000001) Then
found = 1
Exit Do
End If

x0 = x
i = i + 1

Loop

If (found = 1) Then
tadXINTZINSFUSS = x
Else
tadXINTZINSFUSS = (-1) ^ (0.5)
End If

End Function
[/CODE]
 
 
3.
02.06.2014 16:30:44
Danke erstmal für deine Antwort.
Ich habe dies hier für meine Berechnung verwendet:
http://www.file-upload.net/download-8994171/IRR.rar.html

Allerdings kommt bei mir das selbe Ergebniss heraus wie mit der Normalen Xintzinsfuss Formel von Excel.
Ich möchte aber gerne wissen wieviel Prozent ich bis am 30.05.2014 gemacht habe. (Also nicht annualisiert 9,94%)
Hierbei müssten ca. 4,14% herauskommen - Habe den Internen Zinsfuß de-annualisiert (Wenn man das so sagen kann :D )
Wie kann ich dies mit dem Makro berechnen?

Grüße,
PopOff
 
 
4.
02.06.2014 17:46:51
Zitat
PopOff schreibt:

Ich möchte aber gerne wissen wieviel Prozent ich bis am 30.05.2014 gemacht habe. (Also nicht annualisiert 9,94%)

Hierbei müssten ca. 4,14% herauskommen - Habe den Internen Zinsfuß de-annualisiert (Wenn man das so sagen kann   )
Wie kann ich dies mit dem Makro berechnen?

Grüße,

PopOff

=tadXINTZINSFUSS( D9:D23; C9:C23; 0,1 ; 152 / 365 ) * 152 / 365
4,03%
 
 
5.
02.06.2014 18:15:22
Aber dafür bräuchte ich das Makro gar nicht.
Wenn ich so mit XINTZINSFUSS rechne komme ich auch auf die 4%:
=XINTZINSFUSS(D9:D23;C9:C23)* 152 / 365

Somit müsste bräuchte man deine Makro funktion gar nicht. :|
 
 
6.
02.06.2014 20:00:42
4,14% ist eine falsche Zins

=XINTZINSFUSS( D9:D23; C9:C23 )* 152 / 365
4,14%

=tadXINTZINSFUSS( D9:D23; C9:C23; 0,10; 1 ) * 152 / 365
4,14%

4,03% ist die richtige Zinssatz

=tadXINTZINSFUSS( D9:D23; C9:C23; 0,10 ; 152 / 365 ) * 152 / 365
4,03%
Bearbeitet: AbrahamA - 03.06.2014 05:21:49
 
 
7.
03.06.2014 07:00:57
Zitat
PopOff schreibt:
Aber dafür bräuchte ich das Makro gar nicht.

Wenn ich so mit XINTZINSFUSS rechne komme ich auch auf die 4%:

=XINTZINSFUSS(D9:D23;C9:C23)* 152 / 365

Somit müsste bräuchte man deine Makro funktion gar nicht.  

XIRR = 9,94%
XIRR = EFFEKTIVE ZINS

EFFEKTIVE ZINS = (1 + NOMINAL ZINS * Compoundierung)^(1/Compoundierung) - 1

XIRR = (1 + NOMINAL ZINS * Compoundierung)^(1/Compoundierung) - 1


(1 + NOMINAL ZINS * Compoundierung)^(1/Compoundierung) - 1 = XIRR
(1 + NOMINAL ZINS * Compoundierung)^(1/Compoundierung) = 1 + XIRR
(1 + NOMINAL ZINS * Compoundierung) = ( 1 + XIRR )^(Compoundierung)
NOMINAL ZINS * Compoundierung = ( 1 + XIRR )^(Compoundierung) - 1

XIRR = 9,94%
Compoundierung = 152/365

NOMINAL ZINS * 152/365 = ( 1 + 9,94% )^(152/365) - 1
NOMINAL ZINS * 152/365 = ( 1,0994 )^(0,41643835616438356164383561643836) - 1
NOMINAL ZINS * 152/365 = 1,0402526376156975413899026795016 - 1
NOMINAL ZINS * 152/365 = 0,0402526376156975413899026795016
NOMINAL ZINS * 152/365 = 4,025%
NOMINAL ZINS * 152/365 = 4,03%
Bearbeitet: AbrahamA - 03.06.2014 07:03:25
 
 
8.
05.06.2014 18:44:44
Danke :D
 
 
9.
04.07.2014 10:00:13
Hallo,

ich hätte noch eine simplere Methode gefunden um den IRR auf den Aktuellen Tag zu Berechnen.
Wenn man am Ende statt dem Aktuellen Datum einfach das Enddatum vom Ende des Jahres eingibt sollte dies ja den Taggenauen IRR ergeben.?
http://www.file-upload.net/download-9164651/IRR.rar.html

Grüße,
Popoff
 
 
10.
19.07.2014 17:25:15
Hat keiner einen Rat ob dies so stimmt? :wink1:
 
 
 
Seiten: 1
Antworten

News

Fachkräftemangel: Diese Branchen sind am meisten betroffen Fachkräftemangel: Diese Branchen sind am meisten betroffen Die Indexstudie von Pens.com/de zeigt, dass die Branche mit dem höchsten Fachkräftemangel das Ingenieurwesen ist, mit einem Gesamtwert von 8,24 von 10 Punkten. Dieser Wert ergab sich aus insgesamt 80.602......

Qualifizierungsgeld: Unterstützung für Betriebe im Strukturwandel Qualifizierungsgeld: Unterstützung für Betriebe im Strukturwandel Seit dem 1. April 2024 gibt es für Unternehmen eine neue Leistung im Rahmen der Beschäftigtenqualifizierung: das Qualifizierungsgeld. Grundlage ist das neu geregelte Gesetz zur Stärkung der Aus- und Weiterbildungsförderung......

Automatisierte Finanzplanung: Vom Excel-basierten Planungsverfahren zu einer automatisierten, systemgestützten Lösung Automatisierte Finanzplanung: Vom Excel-basierten Planungsverfahren zu einer automatisierten, systemgestützten Lösung Manuelle Konsolidierung von Excel-Templates im Rahmen der Budgetplanung – nicht mehr bei DR. KADE Health Care. Der Berliner Pharmahersteller setzt auf die Finanzplanungssoftware von Corporate Planning......


Aktuelle Stellenangebote

Trainee Wirtschaftswissenschaften | Konzerncontrolling (w/m/d) Du bist bereit, nach deinem Studium beruflich durchzustarten und motiviert, dein Wissen in die Praxis umzu­setzen? Unser 18-monatiges Traineeprogramm bietet dir die Chance, deine Fähigkeiten unter Bew......

Business Analyst*in Teil von Schuback zu sein bedeutet, gemeinsam mit sympathischen, ambitionierten Kollegen den Erfolg unseres kontinuierlich wachsenden Familienunternehmens maßgeblich mitzugestalten. Deine Aufgaben: In......

Controller*in (m/w/d) Sie suchen einen erfüllenden Job, der 365 mal im Jahr Sinn ergibt? Bewerben Sie sich bei der NGD-Gruppe! Erziehen – Fördern – Pflegen – Heilen … Mit rund 70-jähriger Erfahrung im sozialen Dienstleistu......

Controller (m/w/d) Schwerpunkt Produktionscontrolling GOLDBECK realisiert zukunftsweisende Immobilien in Europa. Wir verstehen Gebäude als Produkte und bieten alle Leistungen aus einer Hand: vom Design über den Bau bis zu Services im Betrieb. Aktue......

Data Scientist / Mathematiker / Betriebswirt (m/w/d) mit quantitativer Ausrichtung zur Modellierung von Risikoparametern im Finanzwesen Die GRENKE AG ist mit rund 2.100 Mit­arbei­ter:in­nen in mehr als 30 Ländern „Möglichmacher“ für kleine und mittel­ständische Unter­nehmen. Wir schaffen schnelle und einfache Finanzierungs­lösungen, d......

(Senior) Risikocontroller / Risk Manager (m/w/d) im Finanzwesen Die GRENKE AG ist mit rund 2.100 Mit­arbei­ter:in­nen in mehr als 30 Ländern „Möglichmacher“ für kleine und mittel­ständische Unter­nehmen. Wir schaffen schnelle und einfache Finanzierungs­lösungen, d......

Premium-Mitgliedschaft

Erhalten Sie als StudentIn oder Auszubildene(r) Zugriff auf Premium-Inhalte von Controlling-Portal.de und Rechnungswesen-Portal.de zum Vorzugspreis von 39,- EUR für 2 Jahre. Aktuelle und ständig erweiterte Fachbeiträge, ausgewählte sonst kostenpflichtige Excel-Vorlagen. Verschaffen Sie sich hier einen Überblick über unsere Premium-Inhalte.

Weitere Informationen zum Ausbildungspaket >>

Controlling-Software gesucht?

controlling_Dashboard_pm_ml12nan_B9707546_400x300.jpg

Verschaffen Sie sich hier einen Überblick >>
Anzeige
Excel-Vorlagen für Controlling und Rechnungswesen

Stellenanzeigen

(Junior-) Business Controller (m/w/d)
Bereit, beim Marktführer der Metallzerspanung durchzustarten? Als (Junior-) Business Controller wirst du zu unserem Datenexperten (m/w/d), der alle Business Controlling Aufgaben für unser Vertriebsteam im Griff hat. Du spielst schon bald eine entscheidende Rolle dabei, sicherzuste... Mehr Infos >>

Controller (w/m/d)
Die Motherson Group ist einer der 21 größten und am schnellsten wachsenden Anbieter von Komplett­system­lösungen für die globale Auto­mobil­indus­trie und bedient eine Viel­zahl weiterer Branchen wie Eisen­bahn, Luft- und Raum­fahrt, Medizin, IT und Logistik mit über 180.000 Mitar­beitern in 41 L... Mehr Infos >>

Controller (m/w/d)
Vielfalt gestalten. Wissen nutzen. Verantwortung tragen. Sicherheit geben. LEAVE YOUR MARK! Auch nach über 190 Jahren entwickeln wir unsere Inspektions-, Klassifikations- und Zertifizierungslösungen permanent weiter. Mit großem Erfolg: Heute vertrauen mehr als 400.000 Unternehmen weltweit darauf,... Mehr Infos >>

Risikocontroller (m/w/d)
Bei Flossbach von Storch kümmern wir uns mit mehr als 350 Mitarbeitenden um das Vermögen von etwa einer Million Menschen - unabhängig davon, wie groß es ist. Unsere Verantwortung ist stets die gleiche: ihr Vermögen zu schützen und langfristig mehr daraus machen. Damit sie ihr Leben nach den eigen... Mehr Infos >>

Referent (w/m/d) Fördermittelverwaltung/-controlling
Der DRK-Landesverband Schleswig-Holstein e. V. ist ein Spitzenverband der freien Wohlfahrtspflege, eine nationale Hilfsgesellschaft und ein modernes Dienstleistungsunternehmen. Mit seinen ca. 1.000 Mitarbeitenden betreibt er soziale und therapeutische Einrichtungen und Dienste. Mehr Infos >>

Junior Controller (m/w/d)
Techtronic Industries ist weltweit führend in der Herstellung und im Vertrieb von hochwertigen Elektrowerkzeugen für den DIY-Markt und den Profieinsatz sowie von Gartengeräten. Ein strategischer Fokus auf leistungsstarke Marken, innovative Produkte und außergewöhnliche Menschen bestimmt unseren E... Mehr Infos >>

Controller (m/w/d) − Production Controlling (m/w/d)
LITEF-Produkte sind weltweit in einer Vielzahl von Anwendungen im Einsatz. Unsere Lösungen und Erfahrungen bieten wir Kunden, die dynamische Vorgänge (Beschleunigungen und Drehungen) messen und regeln wollen, Lage und Kurs von Fahrzeugen ermitteln oder navigieren wollen – auf dem Land, in... Mehr Infos >>

Senior Controller (m/w/d)
Willkommen bei der Nr. 1. Mit rund 750 GEERS Fachgeschäften und 2.500 Mitarbeiter:innen ist GEERS der größte Anbieter des Landes in der Hörakustik­branche und als Teil der Sonova mit Sitz in der Schweiz Part des weltweit größten Hör­geräte-Netzwerkes. Wir verfolgen die Vision, dass alle Menschen ... Mehr Infos >>

Weitere Stellenanzeigen im Stellenmarkt >>

Folgen Sie uns!

panthermedia_B90564160_patronestaff_800x504.jpg

Controlling-Portal auf:
Facebook >> und  Linkedin >>

Business Intelligence mit Excel – PC-Seminar

GettyImages-1205248121_290x100.jpg
Sie lernen die Business Intelligence (BI) Tools in Excel anzuwenden und werden so Ihren Arbeitsalltag merklich erleichtern Bspw. lernen Sie, wie Sie mit den Power-Tools Datenmodelle erstellen, Daten analysieren und visualisieren.

Mit dem neu erworbenen Wissen können Sie u. a. zeit- und ressourcensparend Berichte erstellen, mit denen Sie Optimierungspotenziale aufdecken und Geschäftsentscheidungen erleichtern können.   Mehr Infos >>  

JOB- TIPP

Stellenmarkt.jpg
Sind Sie auf der Suche nach einer neuen Herausforderung? Interessante Stellenangebote für Controller finden Sie in der Controlling-Portal Stellenbörse. Ihr Stellengesuch können Sie kostenfrei über ein einfaches Online-Formular erstellen. Zur Stellenbörse >>
 



aufgefallen ?!


Ihre Werbung hier !





Excel-Tools für Controller!

Diagramme_Charts_pm_chormail@hotmail-com_B347361660_400x300.jpg

Über 500 Vorlagen direkt zum Download. Verschaffen Sie sich einen Überblick >>

Software-Tipps

Unbenannt.png
SWOT. Für bessere Entscheidungen. Ob Business 1.0 oder 4.0 - je dynamischer die Märkte werden, desto schneller muss auch das Controlling sein: Wo stehen wir tagesaktuell mit dem Umsatz, welche Produkte liefern aktuell welche Deckungsbeiträge oder wie sieht bei der heutigen Auftragslage der Cashflow im nächsten Quartal aus usw. Mehr Informationen >>

Diamant.PNG
Diamant/3 bietet Ihnen ein Rechnungswesen mit integriertem Controlling für Bilanz- / Finanz- und Kosten- / Erfolgs- Controlling sowie Forderungsmanagement und Personalcontrolling. Erweiterbar bis hin zum unternehmensweiten Controlling. Mehr Informationen >>


Weitere Controlling-Software-Lösungen im Marktplatz >>

Excel Mauspad
50 deutsche Excel-Shortcuts

  • über 50 Excel-Shortcuts für das Büro
  • Keine Suche mehr über das Internet und damit Zeitersparnis
  • Gadget für das Büro
  • Keine Zettelwirtschaft mehr auf dem Schreibtisch
  • Schnelle Antwort auf einen Shortcut wenn Kollegen Sie fragen
  • Preis: 17,95 EUR inkl. MWSt.
Jetzt hier bestellen >>

Premium-Inhalte

Als Premium-Mitglied erhalten Sie Zugriff auf ausgewählte sonst kostenpflichtige Fachbeiträge und Video-Kurse für Premium-Mitglieder inklusive (über 400 Beiträge allein auf Controlling-Portal.de + Premiuminhalte auf Rechnungswesen-Portal.de).

Beispiele:

- Serie zum Berichtswesen in Unternehmen
- Kundenwertanalyse – Wie profitabel ist ein Kunde?
- Potenzialanalyse mit Excel
- Unsere amüsante Glosse: Neulich im Golfclub
- Kostenmanagement in der Logistik
- Dashboards im Kostenmanagement
- Von Total Cost of Ownership (TCO) zu TCOplus
- KLR - Aus der Praxis für die Praxis

Die Gesamtliste an Premium-Fachbeiträgen können Sie hier einsehen >>

Premium-WebinareVideo Kurs: Kennzahlen im Controlling

PantherMedia_Yuri_Arcurs200x150.jpg
Bei der Erstellung eines Kennzahlen-Cockpit, stellt sich oft die Frage, welche KPIs hier zwingend mit aufgenommen werden sollen. In diesem Online-Kurs lernen Sie Schritt für Schritt inkl. praktischer Übungsaufgaben, wie Kennzahlen im Unternehmen priorisiert und im Controlling effektiv eingesetzt werden. Zum Video-Kurs >>

Video Kurs: Controlling kompakt

Controller sind die internen Unternehmensberater im Betrieb. In diesem Controlling Kompakt-Kurs erhalten Sie mehrere Lernvideos, wie gutes Controlling funktioniert. Die Videos sind "Best-of" Auszüge aus anderen spezifischen Video-Kursen. Zum Video-Kurs >>

Video Kurs: Controlling im E-Commerce

Die Gesetze im E-Commerce sind für das Controlling anders. Die Kennzahlen müssen richtig interpretiert werden, um aus den Analysen die richtigen Maßnahmen ableiten zu können. In diesem Online-Kurs lernen Sie Schritt für Schritt, wie erfolgreiches Controlling im E-Commerce funktioniert. Zum Video-Kurs >>

Weitere Video-Kurse finden Sie hier >>

Software-Tipp

Liquiditätsplanung_Fimovi.jpgRollierende Liquiditätsplanung auf Wochenbasis. Mit der Excel-Vorlage „Liquiditätstool“ erstellen Sie schnell und einfach ein Bild ihrer operativen Liquiditätslage für die nächsten (bis zu 52) Wochen.. Preis 47,60 EUR Mehr Infos und Download >>