Já fazia algum tempo que eu queria reviver os tempos do Simulador Populacional de Leporídeos. Não pelas extensas macros e cálculos que o aplicativo envolveu, mas pela simplicidade quase saudosista dos tempos de MS-DOS, em que se fazia arte com caracteres: a ASCII arte. ASCII são aqueles caracteres cirurgicamente escolhidos para comporem as cores, luzes e sombras de uma imagem. Hoje, existem vários softwares que fazem facilmente esse trabalho. Como estava muito fácil, pensei logo em complicar e resolvi fazer uma animação.
Só precisava encontrar um jeito de mudar rapidamente toda a situação da tela, para que as letras que então formavam a imagem mudassem de lugar e dessem a sensação de movimento. Eis que surge uma ferramenta do Excel que ainda não falamos e que tornaria tudo possível: cenários.
Os cenários servem para você analisar resultados em sua planilha. O recurso é uma forma de você ter, na mesma planilha, várias situações diferentes. Como exemplo, veja a planilha abaixo, que prevê depósitos de 5.000,00 cada mês.
Digamos que você queira saber o que aconteceria se os depósitos fossem de 10.000,00. E se fossem de 12.000,00? E de 2.500,00? Para não ter que fazer várias planilhas, ou apagar os valores anteriores, você pode salvá-los em cenários.
Clique na guia Dados, Análise de hipóteses e em Gerenciador de cenários. Na janela que aparece, clique em Adicionar. A janela Editar cenário surge:
Escolha um nome para seu cenário, estabeleça quais as células irão variar e clique em OK. Na janela seguinte, estabeleça os valores para as células.
Se clicar em Adicionar, o processo se repetirá para você inserir outros valores e criar outros cenários.
Para ver e analisar os resultados, vá até a janela de Gerenciador de cenários – guia Dados, Análise de hipóteses e Gerenciador de cenários – escolha o cenário que deseja ver e clique em Mostrar.
Para realizar nossa brincadeira o processo foi o mesmo. Vários cenários foram criados, com caracteres diferentes em cada célula. O artifício que usei para dar o efeito de animação foi uma pequena macro que dispara a exibição dos cenários criados seqüencialmente, associada a uma tecla. Veja o código VBA de uma das animações abaixo:
Public frame
Sub animaPulo()
frame = frame + 1
ActiveSheet.Scenarios("pulando" & frame).Show
If frame >= 4 Then
frame = 0
End If
End Sub
Só para explicar: os cenários da animação Pulando chamam-se “pulando1”, “pulando2”, “pulando3” e assim por diante. Por isso, a variável frame é concatenada com a palavra “pulando”, para se referir ao cenário correto.
Abraços!