Classe Scenarios (Excel VBA)
Uma coleção de todos os objetos Scenario na planilha especificada. Para usar uma variável de classe Scenarios, ela primeiro precisa ser instanciada por exemplo
Add
Cria um novo cenário e o adiciona à lista de cenários disponíveis para a planilha atual.
Um nome de cenário precisa ser exclusivo; o Microsoft Excel gerará um erro se você tentar criar um cenário com um nome que já esteja em uso.
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
O seguinte argumento é opcional
Name (String) - O nome do cenário.
ChangingCells (Range) - Um objeto Range que se refere às células variáveis do cenário.
Optional arguments
Os seguintes argumentos são opcionais
Values (Scenario) - Uma matriz que contém os valores de cenário para as células em ChangingCells. Se esse argumento for omitido, os valores de cenário serão considerados os valores atuais nas células em ChangingCells.
Comment (Comment) - Uma sequência de caracteres que especifica o texto de comentário para o cenário. Quando um novo cenário é adicionado, o nome do autor e a data são adicionados automaticamente no início do texto de comentário.
Locked (Boolean) - True para bloquear o cenário e evitar alterações. O valor padrão é True.
Hidden (Boolean) - True para ocultar o cenário. O valor padrão é False.
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
CreateSummary
Cria uma nova planilha contendo um relatório resumido dos cenários na planilha especificada.
CreateSummary (ReportType, ResultCells)
Worksheets("Sheet1").Scenarios.CreateSummary ResultCells := Worksheets("Sheet1").Range("C4:C9")
Arguments
Optional arguments
Os seguintes argumentos são opcionais
ReportType (XlSummaryReportType) - Especifica se o relatório de resumo é uma tabela dinâmica ou um resumo padrão.
Os valores de retorno possíveis são xlStandardSummary - Lista cenários lado a lado, xlSummaryPivotTable - Exibe cenários em um relatório de tabela dinâmica.
ResultCells (Range) - Um objeto Range que representa as células de resultado na planilha especificada. Normalmente, esse intervalo se refere a uma ou mais células que contêm as fórmulas que dependem dos valores de célula variáveis para o seu modelo; ou seja, as células que mostram os resultados de um cenário específico. Se esse argumento for omitido, não serão incluídas células de resultado no relatório.
Item
Retorna um único objeto de uma coleção.
Item (Index)
Index: O nome ou número de índice do objeto.
Dim scns As Scenarios: Set scns =
Dim scn As Scenario
Set scn = scns(Index:=1)
Merge
Mescla os cenários de outra planilha na coleção Scenarios.
O valor de um intervalo mesclado é especificado na célula do canto superior esquerdo do intervalo.
Merge (Source)
Source: O nome da planilha que contém cenários a serem mesclados ou um objeto Worksheet que representa essa planilha.
Dim scns As Scenarios: Set scns =
scns.Merge Source:=