Freigeben über

Solver Einstellung über VBA

Anonym
2018-08-25T09:10:54+00:00

Bei meinem VBA Programm setze ich für unterschiedliche Aufgaben mehrfach den Solver ein. Daher muss ich vor jedem neuen Einsatz einen  SolverReset  aufrufen. Dabei wird aber immer auch automatisch im Dialogfeld "Solver Parameter" das Kästchen "Nicht eingeschränkte Variable als nicht negativ festlegen" angekreuzt.  Für meine Solveraufgabe muss ich das aber wieder rückgängig machen. Im Handbetrieb geht das mit einem einfachen Klick  - aber im  VBA Programm habe ich bisher noch nicht herausgefunden, wie man das  bewerkstelligen kann. 

Der Makrorecorder -das wäre ja eine naheliegende Lösung- reagiert überhaupt nicht darauf, ob ich das

 Kästchen "Nicht eingeschränkte Variable als nicht negativ festlegen" ankreuze oder nicht.

Auch mit der mächtigen  SolverOptions Funktion - mit der man ja so vieles einstellen kann- komme ich nicht weiter: für das obengenannte Kästchen gibt es keine Option.  Kann mir jemand weiterhelfen ? Ich bin wirklich gespannt darauf, wie das geht  -vielen Dank im Voraus. 

Gerhard Luther , Saarbrücken

Microsoft 365 und Office | Excel | Für Zuhause | Windows

Gesperrte Frage. Diese Frage wurde aus der Microsoft-Support-Community migriert. Sie können darüber abstimmen, ob sie hilfreich ist, aber Sie können keine Kommentare oder Antworten hinzufügen oder der Frage folgen.

0 Kommentare Keine Kommentare

Antwort, die vom Frageautor angenommen wurde

Andreas Killer 144.1K Zuverlässigkeitspunkte Freiwilliger Moderator
2018-08-25T11:16:06+00:00

Ist diese Option:

Sub Test()

  SolverReset

  SolverOptions AssumeNonNeg:=False

End Sub

Andreas.

War diese Antwort hilfreich?

7 Personen fanden diese Antwort hilfreich.
0 Kommentare Keine Kommentare

2 zusätzliche Antworten

Sortieren nach: Am hilfreichsten
  1. Anonym
    2018-08-26T20:50:20+00:00

    Ist diese Option:

    Sub Test()

      SolverReset

      SolverOptions AssumeNonNeg:=False

    End Sub

    Andreas.

    Hallo Diego, hallo Andreas,

    vielen Dank für die freundliche Unterstützung. Die einfache und wirksame Lösung von Andreas hat mich überrascht, denn ich hatte die Optionsliste zum Befehl „SolverOptions“ sorgfältig durchgeschaut

    • in meiner bewährten Bibel, dem Microsoft VB Sprachverzeichnis aus 1996.  Da war nichts Einschlägiges aufgeführt und dies erschien mir „verständlich“, denn das „AssumeNonNeg“ -Kästchen im Dialog-Fenster „Solver Parameter“ gehört ja nicht direkt zu den über den Optionen Button  festzulegenden Optionen.

    Was habe ich daraus gelernt: Das nächste Mal schaue ich auch bei uralten Befehlen im aktuellen Sprachverzeichnis nach:

    https://docs.microsoft.com/en-us/office/vba/excel/concepts/functions/solveroptions-function 

    Nochmals vielen Dank für die Nachhilfe.

    Gerhard Luther

    War diese Antwort hilfreich?

    2 Personen fanden diese Antwort hilfreich.
    0 Kommentare Keine Kommentare
  2. Anonym
    2018-08-25T09:19:24+00:00

    Hallo Gerhard,

    Danke für deine Nachricht.

    Ich würde dir empfehlen dich zum Thema VBA an das **Entwicklerforum (MSDN)**zu wenden:

    https://social.msdn.microsoft.com/forums/de-de/home

    Dort sind die Leute unterwegs, die sich täglich mit solchen Thematiken befassen.

    Solltest du Probleme haben, melde dich gerne wieder.

    Viele Grüße

    Diego B.

    War diese Antwort hilfreich?

    0 Kommentare Keine Kommentare