Classe Scenarios (Excel VBA)

Collection de tous les objets Scenario de la feuille de calcul spécifiée. Pour utiliser une variable de classe Scenarios, elle doit d'abord être instanciée, par exemple

Add

Cette méthode crée un nouveau scénario et l'ajoute à la liste des scénarios disponibles pour la feuille de calcul active.

Le nom d'un scénario doit être unique ; Microsoft Excel produit une erreur si vous essayez de créer un scénario dont le nom est déjà utilisé.

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

Les arguments nommés :

Name (String) - Nom du scénario.

ChangingCells (Range) - Objet Range qui fait référence aux cellules variables du scénario.

Optional arguments

Les arguments suivants sont facultatifs

Values (Scenario) - Tableau contenant les valeurs de scénario des cellules de l'argument ModificationCellules. Si cet argument est omis, les valeurs de scénario sont considérées comme les valeurs actuelles des cellules de ChangingCells.

Comment (Comment) - Chaîne spécifiant les annotations du scénario. Lorsqu'un nouveau scénario est ajouté, le nom de l'auteur et la date sont automatiquement ajoutés au début des annotations.

Locked (Boolean) - True pour verrouiller le scénario afin d'empêcher les modifications. La valeur par défaut est True.

Hidden (Boolean) - True pour masquer le scénario. La valeur par défaut est False.

Count

Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

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

CreateSummary

Cette méthode crée une nouvelle feuille de calcul qui contient un rapport de synthèse pour les scénarios sur la feuille de calcul spécifiée.

CreateSummary (ReportType, ResultCells)

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

Arguments

Optional arguments

Les arguments suivants sont facultatifs

ReportType (XlSummaryReportType) - Indique si le rapport de synthèse est un tableau croisé dynamique ou un résumé standard.

Les valeurs de retour possibles sont xlStandardSummary - Répertorie les scénarios côte à côte, xlSummaryPivotTable - Affiche les scénarios dans un rapport PivotTable.

ResultCells (Range) - Objet Range qui représente les cellules de résultats dans la feuille de calcul spécifiée. Normalement, cette plage fait référence à une ou plusieurs cellules contenant les formules qui dépendent des valeurs de cellules variables de votre modèle; autrement dit, les cellules qui affichent les résultats d’un scénario particulier. Si vous ne spécifiez pas cet argument, aucune cellule de résultat n'est incluse dans le rapport.

Item

Cette méthode renvoie un seul objet d'une collection.

Item (Index)

Index: Nom ou numéro d'index de l'objet.

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

Merge

Cette méthode fusionne les scénarios issus d'une autre feuille dans la collection Scenarios.

La valeur d'une plage fusionnée est spécifiée dans la cellule du coin supérieur gauche de la plage.

Merge (Source)

Source: Nom de la feuille qui contient les scénarios à fusionner ou objet Worksheet qui représente cette feuille.

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