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

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

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
User, die dieses Thema lesen. (1 Gäste, 0 registrierte User, 0 versteckte User):

News

Künstliche Intelligenz (KI) rückt zunehmend in den Fokus der Aufsichtsräte Künstliche Intelligenz (KI) rückt zunehmend in den Fokus der Aufsichtsräte Fast 60 Prozent der Vorstände und Aufsichtsräte haben nach eigener Einschätzung nur wenig oder gar keine Kenntnisse über Künstliche Intelligenz oder Erfahrungen mit KI, immerhin 40 Prozent beschreiben......

Studie: Zwei von drei Bewerbungen mit Hilfe von KI erstellt Studie: Zwei von drei Bewerbungen mit Hilfe von KI erstellt Bewerbungen scheitern, weil sich Jobsuchende oft auf Verdacht bewerben und ihre Unterlagen zu wenig mit den Anforderungen der Arbeitgeber abgleichen. Das ist das Ergebnis einer neuen Stepstone Studie,......

Studie: 32 Prozent der Unternehmen mit der Echtzeit-Transparenz ihrer Finanzzahlen unzufrieden Studie: 32 Prozent der Unternehmen mit der Echtzeit-Transparenz ihrer Finanzzahlen unzufrieden Die weltweit durchgeführte Studie von BlackLine zeigt, dass der Fachkräftemangel, die fortschreitende technologische Entwicklung sowie Unsicherheiten im Umgang mit Künstlicher Intelligenz (KI) zu den ......


Aktuelle Stellenangebote

Controller / Bilanzbuchhalter (m/w/d) Schulze – Heimtierbedarf GmbH: Unser Firmenstandort Porta Westfalica – das „Tor nach Westfalen“ – ist für uns das „Tor zur Welt“. Von hier aus betreuen wir weltweit unsere Kunden und Tierfreunde. Als ......

Junior-Controller (m/w/d) Seit mehr als 40 Jahren steht der Name CELLTHERM für qualitativ hochwertige Kühl- und Tiefkühlzellen. Als einer der führenden Anbieter in Europa sind wir bekannt für unsere vielfältigen Standard- und ......

Stellvertretende Leitung Finanzbuchhaltung (m/w/d) Seit Generationen kümmern wir uns um die Erfassung und Abrechnung von Heizenergie, Wasser und Strom in den verschiedensten Immobilienarten. Dank unserer digitalen Messtechniken können wir Kunden und K......

Bilanzbuchhalter (m/w/d) in Vollzeit Wir für hier! Dieser Grundsatz ist für uns mehr als ein Slogan – er ist unser täglicher Antrieb. Als zukunftsorientiertes Stadtwerk wollen wir die Energiewende und Digitalisierung vor Ort aktiv gestalten.......

Strategische:r Controller:in Kapazitäts- & Produktivitätscontrolling Wir – die HUK-COBURG Versicherungs­gruppe – zählen zu den 10 größten in Deutschland. Vor über 90 Jahren gegründet sind wir mit über 13 Millionen Kund:innen heute der große Versicherer für Privathaushalte......

Financial Controller: Germany & Netherlands Our number one philosophy is Our people. Flight Centre Travel Group's promise is to provide an environment with equality of respect, dignity and opportunity for all our employees. We value an incl......

Tipp der Woche

CP Newsletter: Neben aktuellen Neuigkeiten für Controller und neueingegangene Fachartikel, informieren wir Sie über interessante Literaturtipps, Tagungen , Seminarangebote und stellen Ihnen einzelne Software- Produkte im Detail vor. zur Eintragung >>

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) Group Controller (m/w/d)
Wir sind eine dynamisch wachsende Unternehmensgruppe und suchen zum nächstmöglichen Zeitpunkt eine engagierte Persönlichkeit als (Junior) Group Controller (w/m/d). In dieser verantwortungsvollen Position berichtest du direkt an die Geschäftsführung und gestaltest aktiv die gruppen... Mehr Infos >>

Stellvertretende Leitung Finanzbuchhaltung (m/w/d)
Seit Generationen kümmern wir uns um die Erfassung und Abrechnung von Heizenergie, Wasser und Strom in den verschiedensten Immobilienarten. Dank unserer digitalen Messtechniken können wir Kunden und Kundinnen verlässliche Daten über ihren Energieverbrauch zur Verfügung stellen und machen damit Ei... Mehr Infos >>

Teamleitung Finanzen (m/w/d)
Wir bieten eine interessante und anspruchsvolle Tätigkeit in einem dynamischen, anregenden und unterstützenden internationalen Forschungs­umfeld. Die Vergütung erfolgt nach dem Tarifvertrag für den öffentlichen Dienst (TVöD), je nach persönlicher Qualifikation und Erfahrung bis zur Entgel... Mehr Infos >>

Experte Konzernbilanzierung & Financial Reporting (d/m/w)
Die VR Smart Finanz AG zählt zur DZ BANK Gruppe und damit zu den Eckpfeilern des Allfinanzangebotes der Genossenschaftlichen FinanzGruppe. In Deiner Rolle als Experte:in für Konzernbilanzierung und Financial Reporting bist Du Teil eines Teams, dass die Erstellung der monatlichen Einzel- und Konze... Mehr Infos >>

Junior Controller (m/w/d)
Die GEBHARDT Intralogistics Group ist einer der führenden Anbieter von Materialfluss- und innerbetrieblichen Logistiksystemen. Seit über 70 Jahren entwickelt GEBHARDT maßgeschneiderte Komplettlösungen – von der Idee bis zur vollständigen Realisierung – im Bereich Transport, Materialfluss, Sortier... Mehr Infos >>

Controlling Specialist (m/w/d) – Bereich Theater
Hierbei bist du nicht nur Zahlenjongleur, sondern auch ein echter Business Partner für unsere Produktionen bzw. Shows. Du trägst mit deiner Arbeit aktiv zum Erfolg von internationalen Bühnenhits, wie König der Löwen, Tarzan, &Julia und MJ bei! Mehr Infos >>

(Senior) Beteiligungscontroller (m/w/d)
Als internationale gemeinnützige Organisation ist es unser Ziel, weltweit so vielen Blutkrebspatient:innen wie möglich eine zweite Chance auf Leben zu geben und Zugang zu Stammzelltransplantationen zu verschaffen. Um noch mehr Patient:innen zu helfen, brauchen wir regelmäßig Verstärkung von engag... Mehr Infos >>

Kreditsachbearbeiter für das Immobiliencenter (m/w/d)
Als Tochterunternehmen der Frankfurter Sparkasse und Mitglied der Landesbank Hessen-Thüringen bieten wir von der 1822direkt innovative Direktbankdienstleistungen mit herausragendem Service und attraktiven Konditionen. Unsere Mission seit der Gründung 1996: Kundenorientierung und Qualität auf höch... Mehr Infos >>

Weitere Stellenanzeigen im Stellenmarkt >>

Folgen Sie uns!

panthermedia_B90564160_patronestaff_310px.jpg

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

Veranstaltungs-Tipp

it-kurse-excel-und-controlling-bei-pc-college.png
Sie sind Controller und wollen Ihre Excel oder Power-BI Kenntnisse verbessern? Dann sind unsere Excel /Power-BI Schulungen genau das Richtige für Sie! Lernen Sie, wie Sie Daten effizient analysieren, visualisieren und präsentieren können. Nutzen Sie die Vorteile von Pivot-Tabellen, Formeln, Makros und mehr. Melden Sie sich jetzt an und werden Sie zum Excel oder Power-BI Profi!  Mehr Infos >>  

JOB- TIPP

Karriere_290px.png
Sind Sie auf der Suche nach einer neuen Herausforderung? Interessante Stellenangebote für Controller finden Sie in der Controlling-Portal Stellenbörse. Immer auf dem Laufenden bleiben und neue Jobangebote mit dem Jobletter automatisch erhalten? Zur Jobletter-Anmeldung >>

Excel-Tool Bilanz- und Erfolgsanalyse

Bilanzanalyse-Tool 290px.jpg
Aus Bilanz und G+V werden alle gängigen Bilanz- und Erfolgskennzahlen errechnet und versucht, die Bewertung der Zahlen mit den Ampelfarben grün, gelb und rot deutlich zu machen. Die Ableitung bzw. Berechnung der Kennzahlen wird ausführlich dargestellt.

Jetzt hier für 34,- EUR downloaden >>

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

QuoVadis.jpg
Der BusinessPlanner besticht seit Jahren durch seine schnelle und professionelle Umsetzung einer integrierten Unternehmensplanung. Ein besonderer Fokus liegt auf der Integration von Planbilanz und Finanzplan / Cashflow – inklusive transparentem und aussagekräftigem Reporting.
Mehr Informationen >>

LucaNet_simply_intelligent_Logo_RGB.jpg
LucaNet.Planner deckt alle Anforderungen der integrierten Unternehmensplanung, des Reportings und der Analyse ab. Setzen Sie auf eine Software, die Ihnen mit maximaler Transparenz Arbeitsprozesse erleichtert. Mit wenigen Mausklicks passen Sie vorgefertigte Strukturen an Ihre Bedürfnisse an und importieren Ist-Zahlen über fertige Schnittstellen aus Ihrem Vorsystem.  Mehr Informationen >>

idl.png
Die IDL CPM Suite ist eine Software für die Unternehmenssteuerung mit integrierten Applikationen für Konzernkonsolidierung, Finanzplanung, operative Planung, Managementreporting, regulatorisches Berichtswesen und Analyse. Herausragende Usability, hohe Automatisierung und Fachlichkeit zeichnen sie aus. Mehr Informationen >>

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

Rollierende Liquiditätsplanung auf Wochenbasis

03_Liquiditaetstool.png
Dieses Excel-Tools bietet Ihnen die Grundlage für ein Frühwarnsystem. Der erstellte Liquiditätsplan warnt Sie vor bevorstehenden Zahlungsengpässen, so dass Sie frühzeitig individuelle Maßnahmen zur Liquiditätssicherung einleiten können. Gerade in Krisensituationen ist eine kurzfristige Aktualisierung und damit schnelle Handlungsfähigkeit überlebenswichtig.
Mehr Informationen >>

Excel-Finanzplan-Tool PRO für Kapitalgesellschaften

Dieses Excel-Tool ist ein umfangreiches - auch von Nicht-Betriebswirten schnell nutzbares - integriertes Planungstool, welches den Nutzer Schritt-für-Schritt durch alle Einzelplanungen (Absatz- und Umsatz-, Kosten-, Personal-, Investitionsplanung etc.) führt und daraus automatisch Plan-Liquidität (Cashflow), Plan-Bilanz und Plan-GuV-Übersichten für einen Zeitraum von bis zu 5 Jahren erstellt.
Mehr Informationen >>

Vorlage - Formular für Investitionsplanung, Investitionsantrag

PantherMedia_Prakasit-Khuansuwan_400x299.jpg
Dieses Excel-Tool bietet Ihnen Muster-Formulare für die Steuerung von Investitionen/ Anlagenbeschaffungen in einem Unternehmen. Es sind es sind Vorlagen zu Investitionsplanung und Investitionsantrag enthalten.
Mehr Informationen >>

Weitere über 400 Excel-Vorlagen finden Sie hier >>

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 >>

Excel TOP-SellerRS Liquiditätsplanung L

PantherMedia_pannawat_B100513902_400x300.jpg
Die RS Liquiditätsplanung L ist ein in Excel erstelltes Werkzeug für die Liquiditätsplanung von Kleinunternehmen sowie Freiberuflern. Die Planung erfolgt auf Basis von veränderbaren Einnahmen- und Ausgabepositionen. Detailplanungen können auf extra Tabellenblättern für z.B. einzelne Projekte oder Produkte vorgenommen werden. 
Mehr Informationen >>

Rollierende Liquiditätsplanung auf Wochenbasis

Dieses Excel-Tool bietet Ihnen die Grundlage für ein Frühwarnsystem. Der erstellte Liquiditätsplan warnt Sie vor bevorstehenden Zahlungsengpässen, so dass Sie frühzeitig individuelle Maßnahmen zur Liquiditätssicherung einleiten können. Gerade in Krisensituationen ist eine kurzfristige Aktualisierung und damit schnelle Handlungsfähigkeit überlebenswichtig. Mehr Informationen >>

Strategie-Toolbox mit verschiedenen Excel-Vorlagen

Die Strategie-Toolbox enthält 10 nützliche Excel Vorlagen, die sich erfolgreich in der Strategie bewährt haben. Alle Tools sind sofort einsatzbereit und sind ohne Blattschutz. Damit können die Vorlagen individuell angepasst werden.
Ideal für Mitarbeiter aus dem strategischen Management. Mehr Informationen>>

Weitere über 400 Excel-Vorlagen 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. Mehr Infos und Download >>