Hallo zusammen,
ich habe derzeit ein Problem mit der Anzeige der richtigen Währungen.
Ich habe in einer Tabelle verschiedene Werte, die ich über VBA in die Tabelle eintrage. Funktioniert alles super, in 2 Spalten werden Währungen eingetragen, diese werden auch korrekt in die Tabelle eingetragen.
Nun werden die Werte aus dieser Tabelle in ein bereits bestehendes Diagramm eingepflegt, was auch funktioniert, nur dass er bei den Währungen aus € einfach $ macht.
Wenn ich beim Diagramm dann den Reiter "Daten auswählen" öffne und einfach wieder auf "ok" drücke, werden die Werte im Diagramm wieder als € dargestellt.
Wo ist der Fehler?
Das macht für mich relativ wenig Sinn.
Mit folgendem Code trage ich die Werte aus einer Userform in die Tabelle ein:
ActiveCell.EntireRow.Insert
ActiveCell = AuszahlungVon
ActiveCell.Offset(0, 1) = CCur(Betrag)
ActiveCell.Offset(0, 2) = CDate(Auszahlungsdatum)
ActiveCell.Offset(0, 3) = Zs
ActiveCell.Offset(0, 4).FormulaR1C1 = "=DAYS(IF([@Rückzahlungsdatum]=""-"",TODAY(),[@Rückzahlungsdatum]),[@Auszahlungsdatum])"
ActiveCell.Offset(0, 5).FormulaLocal = "=([@Höhe]*(1+([@Zinssatz]/365))^[@Zinstage])-[@Höhe]"
ActiveCell.Offset(0, 6) = "-"
LG, Nico