Solver läuft in Macro nicht
25.10.2004 16:35:24
Oliver
benötige DRINGEND Eure Hilfe. Folgendes Problem:
Wenn ich den Solver im Worksheet anwende, funktioniert dieser absolut ok.
Zeichne ich jedoch das Makro 1:1 parallel auf und spiele es wieder ab, so flackert nur der Bildschirm kurz aber der Solver setzt keinerlei Werte ein.
Auch wenn ich danach über Tools / Solver... das Dialog-Fenster aufrufe ist dies komplett leer, obwohl ich keinen SolverReset-Befehl abgesetzt habe.
In der VBA-Umgebung war über Tools / References die Solver-Library eingebunden. Habe es auch schon mit einem vorgeschalteten SolverReset probiert -- nichts..
Der vom Recorder aufgezeichnete Code sieht wie folgt aus:
Worksheets("Minor BS alloc").Activate
SolverOk SetCell:="$G$12", MaxMinVal:=3, ValueOf:="0", ByChange:="$G$7:$G$10"
SolverAdd CellRef:="$G$7:$G$10", Relation:=5, FormulaText:="binary"
SolverOk SetCell:="$G$12", MaxMinVal:=3, ValueOf:="0", ByChange:="$G$7:$G$10"
SolverSolve
Danke Euch schon im Voraus
Oliver