Silver-Schleife
26.08.2019 09:18:51
Oliver
ich brauche eine Schleife für den Excel Solver um in etwa 4000 Werte lösen zu können:
Mein erster Ansatz ist eine Modifikation aus dem Makro-Recorder nachdem ich den Solver für eine _ Zeile angewendet habe:
Sub Makro1()
' Makro1 Makro
Dim i As Integer
For i = 2 To 10
SolverOk SetCell:="$T$" & i, MaxMinVal:=3, ValueOf:=0, ByChange:="$S$" & i, Engine:=1 _
, EngineDesc:="GRG-Nichtlinear"
SolverSolve
Next i
End Sub
Sub oder Funktion nicht definiert"
Ich würde um eure Hilfe bitten die Fehler nach und nach zu korrigieren. Hier ist eine
Beispieldatei in der ich diese Solver-Schleife gerne anwenden würde:
https://www.herber.de/bbs/user/131615.xlsm _
a>
Beste Grüße
