Classe Scenario - scénario (Excel VBA)

Cet objet représente un scénario dans une feuille de calcul. Pour utiliser une variable de classe Scenario, elle doit d'abord être instanciée, par exemple

For Each

Voici un exemple de traitement des éléments Scenario dans une collection

Dim scns As Scenarios: Set scns = 
For Each scn In scns.Merge Source:=
	With scn
		
	End With
Next scn

ChangeScenario

Cette méthode modifie le scénario afin d'obtenir un nouveau jeu de cellules variables et (éventuellement) de valeurs de scénario.

Si vous spécifiez l'argument Valeurs, chacune des cellules du tableau qui sont comprises dans la plage ModificationCellules doit contenir un élément. Si tel n'est pas le cas, Microsoft Excel génère une erreur.

ChangeScenario (ChangingCells, Values)

Worksheets("Sheet1").Scenarios(1).ChangeScenario ChangingCells:=Worksheets("Sheet1").Range("A1:A10")

Arguments

Un argument nommé

ChangingCells (Range) - Objet Range qui spécifie le nouveau jeu de cellules variables pour le scénario. Les cellules variables doivent se trouver dans la même feuille que le scénario.

Optional arguments

Les arguments suivants sont facultatifs

Values (Scenario) - Tableau qui contient les nouvelles valeurs du scénario pour les cellules variables. Si vous ne spécifiez pas cet argument, les valeurs du scénario sont les valeurs actuelles des cellules variables.

ChangingCells

Renvoie un objet Range qui représente les cellules variables d’un scénario. En lecture seule.

Dim scn As Scenario: Set scn = 
Dim rngChangingCells As Range
Set rngChangingCells = scn.ChangingCells

Comment

Cette propriété renvoie ou définit une valeur de type String qui représente le commentaire associé au scénario.

Le texte de commentaire ne doit pas dépasser 255 caractères.

Worksheets("Sheet1").Scenarios(1).Comment =  "Worst case July 1993 sales"

Delete

Cette méthode supprime l'objet.

Dim scn As Scenario: Set scn = 
scn.Delete

Hidden

Cette propriété renvoie ou définit une valeur de type Boolean qui indique si le scénario est masqué.

La valeur par défaut de cette propriété est False. Ne confondez pas cette propriété avec la propriété FormulaHidden .

Dim scn As Scenario: Set scn = 
scn.Hidden = True

Index

Cette propriété renvoie une valeur de type Long qui représente le numéro d'index de l'objet au sein de la collection d'objets similaires.

Dim scn As Scenario: Set scn = 
Dim lngIndex As Long
lngIndex = scn.Index

Locked

Cette propriété renvoie ou définit une valeur de type Boolean qui indique si l'objet est verrouillé.

Cette propriété renvoie la valeur true si l’objet est verrouillé ou la valeur false si l’objet peut être modifié lorsque la feuille est protégée.

Dim scn As Scenario: Set scn = 
scn.Locked = True

Name

Cette propriété renvoie ou définit une valeur de type String qui représente le nom de l'objet.

Dim scn As Scenario: Set scn = 
scn.Name =

Show

Affiche le scénario en insérant ses valeurs dans la feuille de calcul. Les cellules affectées sont celles qui changent dans le scénario.

Dim scn As Scenario: Set scn = 
Dim booShow As Boolean
booShow = scn.Show

Values

Cette propriété renvoie un tableau de type Variant qui contient les valeurs actuelles des cellules qui changent pour le scénario.

Values (Index)

Index: Position de la valeur.

Dim scn As Scenario: Set scn = 
Dim varValues As Variant
varValues = scn.Values