SolverDelete-Funktion

Löscht eine bestehende Nebenbedingung. Entspricht dem Klicken auf Solver in der Gruppe Datenanalyse | und anschließendem Klicken auf Löschen im Dialogfeld Solver-Parameter.

Hinweis Das Solver-Add-In ist standardmäßig nicht aktiviert. Before you can use this function, the Solver add-in must be enabled and installed. Informationen hierzu finden Sie unter Verwenden der Solver VBA-Funktionen. Nach der Installation des Solver-Add-Ins müssen Sie einen Verweis auf das Solver-Add-In erstellen. Klicken Sie im Visual Basic-Editor mit einem aktiven Modul auf Verweise im Menü Extras, und wählen Sie dann Solver unter Verfügbare Verweise aus. Wenn Solver nicht unter Verfügbare Verweise angezeigt wird, klicken Sie auf Durchsuchen, und öffnen Sie dann "Solver.xlam" im Unterordner "\Programme\Microsoft Office\Office14\Library\SOLVER".

SolverDelete( CellRef, Relation, FormulaText)

CellRef Erforderlicher Variant -Wert. Ein Bezug auf eine Zelle oder einen Zellbereich, der die linke Seite der Nebenbedingung bildet. Relation Erforderliche ganze Zahl. Die arithmetische Beziehung zwischen der linken und rechten Seite der Nebenbedingung. Wenn Sie 4, 5 oder 6 auswählen, muss CellRef auf Entscheidungsvariablenzellen verweisen, und FormulaText sollte nicht angegeben werden.

Relation	Arithmetische Beziehung
1	<=
2	=
3	>=
4	Zellen, auf die von CellRef verwiesen wird, müssen endgültige Werte aufweisen, die ganze Zahlen sind.
5	Zellen, auf die von CellRef verwiesen wird, müssen den endgültigen Wert 0 (null) oder 1 aufweisen.
6	Zellen, auf die von CellRef verwiesen wird, müssen alle unterschiedlichen endgültigen Werte und ganze Zahlen aufweisen.

FormulaText Optionaler Variant -Wert. Die rechte Seite der Nebenbedingung.

Beispiel

In diesem Beispiel wird das zuvor berechnete und in Sheet1 gespeicherte Solvermodell geladen, eine der Nebenbedingungen gelöscht und das Modell erneut ausgewertet.

Worksheets("Sheet1").Activate 
SolverLoad loadArea:=Range("A33:A38") 
SolverDelete cellRef:=Range("C4:E6"), _ 
 relation:=4 
SolverSolve userFinish:=False

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.