Klasse Scenarios (Excel VBA)

Eine Auflistung aller Scenario -Objekte auf dem angegebenen Arbeitsblatt. Um eine Scenarios -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Add

Erstellt ein neues Szenario und fügt es der für das aktuelle Arbeitsblatt verfügbaren Szenarioliste hinzu.

Der Name eines Szenarios muss eindeutig sein. Microsoft Excel gibt eine Fehlermeldung aus, wenn Sie ein Szenario mit einem bereits verwendeten Namen erstellen möchten.

Add (Name, ChangingCells, Values, Comment, Locked, Hidden)

Worksheets("Sheet1").Scenarios.Add Name:="Best Case", _ 
 ChangingCells:=Worksheets("Sheet1").Range("A1:A4"), _ 
 Values:=Array(23, 5, 6, 21), _ 
 Comment:="Most favorable outcome."

Arguments

Hier sind die benannte Argumente :

Name (String) - Der Name des Szenarios.

ChangingCells (Range) - Ein Range -Objekt, das sich auf die sich verändernden Zellen für das Szenario bezieht.

Optional arguments

Die folgenden Argumente sind optional

Values - Scenario

Comment (Comment) - Eine Zeichenfolge, die einen Kommentar für das Szenario angibt.

Locked (Boolean) - Mit True wird das Szenario gesperrt, um Änderungen zu verhindern.

Hidden - Boolean

Count

Gibt einen Long-Wert zurück, der die Anzahl der Objekte in der Auflistung darstellt.

Dim scns As Scenarios: Set scns = 
Dim lngCount As Long
lngCount = scns.Count

CreateSummary

Creates a new worksheet that contains a summary report for the scenarios on the specified worksheet.

CreateSummary (ReportType, ResultCells)

Worksheets("Sheet1").Scenarios.CreateSummary ResultCells := Worksheets("Sheet1").Range("C4:C9")

Arguments

Optional arguments

Die folgenden Argumente sind optional

ReportType (XlSummaryReportType) - Gibt an, ob es sich beim Zusammenfassungsbericht um eine PivotTable oder eine Standard Zusammenfassung handelt.

Mögliche Rückgabewerte sind xlStandardSummary - Listet die Szenarien nebeneinander auf, xlSummaryPivotTable - Zeigt die Szenarien in einem PivotTable-Bericht an.

ResultCells (Range) - Ein Range -Objekt, das die Ergebniszellen des angegebenen Arbeitsblatts darstellt.

Item

Gibt ein einzelnes Objekt aus einer Auflistung zurück.

Item (Index)

Index: Der Name oder die Indexnummer für das Objekt.

Dim scns As Scenarios: Set scns = 
Dim scn As Scenario
Set scn = scns(Index:=1)

Merge

Führt die Szenarios aus einem anderen Blatt in der Scenarios-Auflistung zusammen.

Der Wert eines zusammengeführten Bereichs wird in der Zelle in der oberen linken Ecke des Bereichs angegeben.

Merge (Source)

Source: Der Name des Blatts, das die zu verbindenden Szenarien enthält, oder ein Worksheet -Objekt, das dieses Blatt darstellt.

Dim scns As Scenarios: Set scns = 
scns.Merge Source:=