Mais uma do nosso fórum. O colega Daniel Matos precisou de uma macro que possibilitasse a troca automática de planilhas, como se fosse um Slide Show. Bom, o resultado foi uma planilha com um código que possibilitou a façanha. No caso do anexo, o tempo entre a troca das planilhas é de 2 segundos, mas pode ser no método IniciaSlideShow:

Sub IniciaSlideShow()
    SlideShowActive = True
    Application.OnTime Now + TimeValue("00:00:02"), "TrocaPlanilha"
End Sub

O tópico do fórum que gerou a discussão foi este:

Excel VBA – Trocar Userform’s Automático

O download da planilha pode ser feito aqui:

PlanilhaSlideShow.zip Planilha SlideShow VBA Tamanho: (12.07 KiB)

Comentários

comentários