Solver in VBA gibt Fehlermeldung: Solver: Unerwarteter interner Fehler, oder der verfügbare...

Das Problem bei dieser Version ist, dass der Solver über VBA gesteuert komischerweise keine Kommastellen bei den Nebenbedingungen verarbeiten kann.

Ja, das ist ein Bug. Hab ich auch schon mal direkt beim Hersteller moniert... vor Jahren...

Dein Code sieht z.B. so aus:

SolverAdd CellRef:="$A$1", Relation:=1, FormulaText:="0,8"

mach ein = vor die Zahl in FormulaText, dann geht es:

SolverAdd CellRef:="$A$1", Relation:=1, FormulaText:="=0,8"

Andreas.

Dies scheint jedoch nicht ein Problem des Arbeitsspeichers zu sein.

Nicht unbedingt.

Also zuerst einmal solltest Du prüfen, bzw. von Hand nachstellen ob der Solver überhaupt eine Lösung für das gestellte Problem berechnet.

Wenn dem der Fall ist, dann sollte Dein Makro mit SolverReset anfangen, sonst hast Du ggf. noch Einstellungen einer vorherigen Berechnung im Solver drin.

Dann mach einfach mal eine Leerzeile an den Anfang in jedes Modul in Deiner Datei und lösche Sie wieder und dann klick auf Debuggen\Komplieren von VBAProject. (VBA kompiliert bei Bedarf zwar automatisch, aber das kann manchmal komische Folgen haben).

Dann ist die nächste Frage ob Dein Code Bedingungen mit Dezimalstellen in den Solver lädt, wenn ja, dann prüfe ob diese Werte auch wirklich so im Solver ankommen.

Wenn alles bis hier ok ist, dann kann es an der System-Einstellung des virtuellen Arbeitsspeichers liegen. In VBA gibt es einen ähnliches Problem mit dem Fehler 35010, hier hilft dann in diesen seltenen Fällen eine Erhöhung des virtuellen Arbeitsspeichers
in Windows. Aber ich halte es für unwahrscheinlich das es für Dich zutrifft.

Andreas.

Hallo Andreas

Vielen Dank für Deine Vorschläge!

Ich habe nun einiges ausprobiert und nachgeforscht.

"Von Hand" funktioniert der Solver wunderbar. Das Problem bei dieser Version ist, dass der Solver über VBA gesteuert komischerweise keine Kommastellen bei den Nebenbedingungen verarbeiten kann. Wenn die Nebenbedingungen jedoch bspw. in Prozent o.ä. definiert
werden funktionierts.

Vielen Dank nochmals und VG

Allerdings musst Du zum Ausführen entweder einen VBA-Verweis zum Solver setzen, oder ein Modul benutzen welches den Solver initialisiert (Kannst Du von mir haben).



Damit Dein Makro nun auch noch automatisch ausgeführt wird könntest Du es im WorkSheet_Change Ereignis aufrufen... aber eins nach dem anderen. ;-)



Andreas.

Hallo Andreas,

unter XP hat die Automatisierung eines VBA-Programms mit Solver-Anweisungen (z.B. Solverreset, SolverSolve UserFinish:=True usw.) funktioniert - in Win7 Office 2010 leider nicht mehr. Es kommt der Fehler "Projekt oder Bibliothek nicht gefunden". Manueller
Start des Solver funktioniert korrekt (also der Solver ist korrekt installiert und aktiviert). Vermutlich trifft Dein Hinweis des VBA-Verweis auf den Solver zu - aber wie mache ich das und was ist noch zu beachten?

Danke für Deine Unterstützung und Gruß

Hallo Claus,

eventuell habe ich mich nicht klar ausgedrückt. Ich habe natürlich den Solver zunächst installiert und dann auch aktiviert. Als Ergebnis kam dann dieses Fragezeichen, das, wie du richtig bemerkt hast, das Icon des Solver ist. Wenn ich allerdings darauf klicke,
kommt die erste Fehlermeldung, die ich erwähnt habe. D.h. ich kann den Solver, obwohl er korrekt aktiviert ist, nicht verwenden.

Wenn ich Excel schließe, kommt die zweite Fehlermeldung, die ich erwähnt habe.

Ich habe Solver bereits mehrfach aktiviert und deaktiviert und Excel neu gestartet. Hilft alles nichts.

Beim Starten kommt auch noch folgende Fehlermeldung:

Das Makro 'Solver.XLAM!GetSolverLabel' kann nicht ausgeführt werden. Das Makro ist möglicherweise in dieser Arbeitsmappe nicht verfügbar, oder alle Makros wurden deaktiviert.

Ich habe wirklich keine Ahnung, was ich falsch mache, und hoffe mir kann jemand weiterhelfen.

Danke.