ich will eine Function programmieren, bei der ich einen bestimmten Bereich auswähle z.B. A1:A20.
Jede Zelle soll mit 1 addiert und mit der nächsten Zeile multipliziert werden.
Ungefähr so: (1+A1) * (1+A2) * ... (1 + A20)
Function Multiplikation(Werte)
Dim x
Dim Ergebnis
x = Werte.Rows.Count
For i = 1 To x Step 1
Ergebnis = (1 + Werte(i))
Next i
Werte = Ergebnis
End Function
Was muss ich schreiben damit er die o.g. Formel nutzt?
Aktuell berechnet er ja nur die letzte Zelle..