Classe Scenario (Excel VBA)

A classe Scenario representa um cenário em uma planilha.

Os principais procedimentos da classe Scenario são Delete e Scenarios.Add

For Each

Aqui está um exemplo de processamento dos itens Scenario em uma coleção.

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

Métodos

Estes são os principais métodos da classe Scenario

Delete - Exclui o objeto.

scn.Delete

Scenarios.Add - Cria um novo cenário e o adiciona à lista de cenários disponíveis para a planilha atual.

Dim strName As String: strName = 
Dim scns As Scenarios: Set scns = 
Dim scn As Scenario
Set scn = scns.Add(Name:=strName, ChangingCells:=)

Estes são os principais métodos da classe

ChangeScenario - Altera o cenário para ter um novo conjunto de células variáveis e opcionalmente valores de cenário.

Show - Mostra o cenário inserindo seus valores na planilha. As células afetadas são as células variáveis do cenário.

Scenarios.CreateSummary - Cria uma nova planilha contendo um relatório resumido dos cenários na planilha especificada.

Scenarios.Item - Retorna um único objeto de uma coleção.

Scenarios.Merge - Mescla os cenários de outra planilha na coleção Scenarios.

Propriedades

ChangingCells Retorna um objeto Range que representa as células variáveis de um cenário. Somente leitura.

Dim rngChangingCells As Range
Set rngChangingCells = scn.ChangingCells

Comment Retorna ou define um valor String que representa o comentário associado ao cenário.

scn.Comment =

Hidden Retorna ou define um valor Boolean que indica se o cenário está oculto.

scn.Hidden = True

Index Retorna um valor Long que representa o número de índice do objeto dentro da coleção de objetos semelhantes.

Dim lngIndex As Long
lngIndex = scn.Index

Locked Retorna ou define um valor Boolean que indica se o objeto está bloqueado.

scn.Locked = True

Name Retorna ou define um valor String que representa o nome do objeto.

scn.Name =

Parent Retorna o objeto pai do objeto especificado. Somente leitura.

Dim objParent As Object
Set objParent = scn.Parent

Values Retorna uma matriz que contém os valores atuais das células variáveis do cenário.

Dim varValues As Variant
varValues = scn.Values

Scenarios.Count Retorna um valor Long que representa o número de objetos na coleção.

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

Scenarios.Parent Retorna o objeto pai do objeto especificado. Somente leitura.

Dim scns As Scenarios: Set scns = 
Dim objParent As Object
Set objParent = scns.Parent