Re: Summenformel
Verfasst: Di, 04.03.2014 09:14
Ich würde das mittels einer selbstgebauten Funktion lösen. Dadurch kann man im Macrocode Schleifen verwenden, was die Sache vereinfacht.
Ich gehe mal davon aus, dass a, b, c, d ganze Zahlen sind, da du diese auch zur Berechnung der Laufvariablen verwendest. Ansonsten musst du diese entsprechend runden oder trimmen.
Ich gehe mal davon aus, dass a, b, c, d ganze Zahlen sind, da du diese auch zur Berechnung der Laufvariablen verwendest. Ansonsten musst du diese entsprechend runden oder trimmen.
Code: Alles auswählen
Function fnSummenformel (a as Integer, b as Integer, c as Integer, d as Integer) as Double
Dim i as Integer 'Laufvariable
Dim j as Integer 'Laufvariable
Dim k as Integer 'Laufvariable
Dim sum1 as Double
Dim sum2 as Double
Dim sum3 as Double
sum1 = 0
For i = c to 100
sum1 = sum1 + 100^(i/100)
Next
sum2 = 0
For j = (a-1) to (b-1)
sum2 = sum2 + 2^i * 52516
Next
sum3 = 0
For k = 0 to d
sum3 = sum3 + 100^(i/100)
Next
fnSummenformel = 2^a * 25 * sum1 + sum2 + 2^b * 25 * sum3
End Function