Thema Datum  Von Nutzer Rating
Antwort
18.07.2022 09:30:24 Opportunity_Cost
NotSolved
18.07.2022 09:53:49 Gast1825
NotSolved
18.07.2022 10:19:55 Opportunity_Cost
NotSolved
18.07.2022 10:20:32 Gast3025
NotSolved
18.07.2022 10:24:16 Gast85132
NotSolved
18.07.2022 10:29:18 Gast85132
**
NotSolved
18.07.2022 10:20:06 Gast32759
*****
NotSolved
18.07.2022 10:23:09 Opportunity_Cost
NotSolved
25.07.2022 14:13:22 Opportunity_Cost
NotSolved
25.07.2022 16:10:07 Gast15075
NotSolved
25.07.2022 21:22:31 Gast15772
NotSolved
26.07.2022 09:29:54 Opportunity_Cost
NotSolved
26.07.2022 14:12:27 Gast94377
NotSolved
Blau Blau XIRR Funktion, beginnend mit dem ersten Wert <>0
26.07.2022 17:24:09 Opportunity_Cost
NotSolved

Ansicht des Beitrags:
Von:
Opportunity_Cost
Datum:
26.07.2022 17:24:09
Views:
146
Rating: Antwort:
  Ja
Thema:
XIRR Funktion, beginnend mit dem ersten Wert <>0

Vielen Dank für den Hinweis. Ein Problem ist halt, dass sich der Code auf den Ursprungsnamen der Sheets bezieht, also Fund I-V. Wenn ich dann die Inputs ändere nachdem die Sheets bereits neue Namen haben, sucht der Code quasi nach den Tabs "Fund I" etc. findet sie aber nicht, da sie schon einen neuen Namen haben. Gibt es da eine bessere Lösung?

Private Sub Worksheet_Change(ByVal Target As Range)
    
If Not Intersect(Target, Range("C11")) Is Nothing Then
If IsEmpty(Target) Then Exit Sub
Sheets("Fund I").Name = Range("C11").Value
End If
If Not Intersect(Target, Range("C12")) Is Nothing Then
If IsEmpty(Target) Then Exit Sub
Sheets("Fund II").Name = Range("C12").Value
End If
If Not Intersect(Target, Range("C13")) Is Nothing Then
If IsEmpty(Target) Then Exit Sub
Sheets("Fund III").Name = Range("C13").Value
End If
If Not Intersect(Target, Range("C14")) Is Nothing Then
If IsEmpty(Target) Then Exit Sub
Sheets("Fund IV").Name = Range("C14").Value
End If
If Not Intersect(Target, Range("C15")) Is Nothing Then
If IsEmpty(Target) Then Exit Sub
Sheets("Fund V").Name = Range("C15").Value
End If
End Sub

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
18.07.2022 09:30:24 Opportunity_Cost
NotSolved
18.07.2022 09:53:49 Gast1825
NotSolved
18.07.2022 10:19:55 Opportunity_Cost
NotSolved
18.07.2022 10:20:32 Gast3025
NotSolved
18.07.2022 10:24:16 Gast85132
NotSolved
18.07.2022 10:29:18 Gast85132
**
NotSolved
18.07.2022 10:20:06 Gast32759
*****
NotSolved
18.07.2022 10:23:09 Opportunity_Cost
NotSolved
25.07.2022 14:13:22 Opportunity_Cost
NotSolved
25.07.2022 16:10:07 Gast15075
NotSolved
25.07.2022 21:22:31 Gast15772
NotSolved
26.07.2022 09:29:54 Opportunity_Cost
NotSolved
26.07.2022 14:12:27 Gast94377
NotSolved
Blau Blau XIRR Funktion, beginnend mit dem ersten Wert <>0
26.07.2022 17:24:09 Opportunity_Cost
NotSolved