Como repetir ou executar ciclicamente uma macro a cada X minutos no Excel?
Ao trabalhar com o Microsoft Excel, poderá necessitar de criar macros para realizar determinadas operações. Por exemplo, pretende criar uma macro para copiar automaticamente um intervalo de dados para um novo local. Como os dados serão alterados frequentemente, precisa que esta macro seja executada automaticamente a cada 5 minutos, sem ter de a ativar manualmente, de modo a sincronizar estes dois intervalos de dados. Como o pode conseguir? O método neste artigo pode ajudá-lo.
Repetir ou executar em ciclo uma macro a cada X minutos no Excel
Repetir ou executar em ciclo uma macro a cada X minutos no Excel
O código VBA seguinte permite-lhe executar uma macro repetidamente a cada X minutos no Excel. Siga os passos abaixo.
1. Prima simultaneamente as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Na janela do Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie e cole o código VBA seguinte na janela Código. Veja a imagem:
Código VBA: Repetir ou executar em ciclo uma macro a cada X minutos no Excel
Sub ReRunMacro()
Dim xMin As String
'Insert your code here
xMin = GetSetting(AppName:="Kutools", Section:="Macro", Key:="min", Default:="")
If xMin = "Exit" Then
SaveSetting "Kutools", "Macro", "min", "False"
Exit Sub
End If
If (xMin = "") Or (xMin = "False") Then
xMin = Application.InputBox(prompt:="Please input the interval time you need to repeat the Macro", Title:="Kutools for Excel", Type:=2)
SaveSetting "Kutools", "Macro", "min", xMin
End If
If (xMin <> "") And (xMin <> "False") Then
Application.OnTime Now() + TimeValue("0:" + xMin + ":0"), "ReRunMacro"
Else
Exit Sub
End If
End SubNota: No código, substitua esta linha ‘Insira aqui o seu código’ pelo código que pretende executar a cada X minutos.
3. Prima a tecla F5 para executar o código. Na caixa de diálogo Kutools para Excel que surge, introduza o intervalo de tempo com base no qual pretende repetir a macro e, em seguida, clique no botão OK. Veja a imagem:
A partir de agora, a macro especificada será executada automaticamente a cada 5 minutos na sua pasta de trabalho.
Nota: Se precisar de interromper a execução da macro e alterar o intervalo do ciclo, copie o código VBA seguinte para a mesma janela Módulo e prima a tecla F5 para executar o código. A macro será então interrompida; execute novamente o código acima para definir um novo intervalo.
Código VBA: Interromper a execução da macro
Sub ExitReRunMacro()
SaveSetting "Kutools", "Macro", "min", "Exit"
End Sub
Desbloqueie a Magia do Excel com KUTOOLS AI
- Execução Inteligente: Realize operações em células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- fórmulas personalizadas: Crie fórmulas personalizadas para simplificar os seus fluxos de trabalho.
- Programação VBA: Escreva e implemente código VBA com facilidade.
- Interpretação de Fórmulas: Compreenda facilmente fórmulas complexas.
- Tradução de Texto: Elimine barreiras linguísticas nas suas folhas de cálculo.
Artigos relacionados:
- Como repetir linhas ao navegar pela folha de cálculo no Excel?
- Como repetir a última ação ou a anterior no Excel?
- Como imprimir linhas repetidamente na parte inferior de cada página impressa no Excel?
- Como repetir um valor de célula até que um novo valor seja encontrado ou alcançado no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos