VBA: GoalSeek mit Schätzwert --Wie geht das?
Gho-Reg
Private Sub CommandButton2_Click()
'C39 = Ergebnisrendite
'C15 = Zielrendite
'F28 = hochkontierte Gewinnmarge
Range("C39").GoalSeek Goal:=Range("C15"), ChangingCell:=Range("F28")
End Sub
Das ist mein derzeitiger code. Der funktioniert auch problemlos. Nur durch die Beschränkung der Näherungsintervalle führt meine angenäherte Gewinnmarge zu einer Ergebnisrendite von 24,98% statt der gewünschten Zielrendite von 25,00%. Also noch zu ungenau wenn man mal von 2stelligen Millionenbeträgen ausgeht ;)
Ich glaube durch eine Eingabe eines Schätzwertes (den ich relativ genau angeben kann) kann man diese Ungenauigkeit erheblich verkleinern.
Wie gebe ich den Schätzwert in den VBA Code ein? (ich schätz mal da gibts noch irgendeinen Zusatzbaustein aber ich habe den nirgends gefunden)
Besten Dank schonmal jetzt für eure Hilfe