Comment répéter ou boucler une macro toutes les X minutes dans Excel?
Lorsque vous travaillez avec Microsoft Excel, vous devrez peut-être créer des macros pour effectuer certaines opérations. Par exemple, vous souhaitez créer une macro pour copier automatiquement une plage de données vers un nouvel emplacement. Comme les données seront fréquemment modifiées, vous avez besoin que cette macro s'exécute automatiquement toutes les 5 minutes sans la déclencher manuellement afin de synchroniser ces deux plages de données. Comment y parvenir? La méthode décrite dans cet article peut vous aider.
Répétez ou bouclez une macro toutes les X minutes dans Excel
Répétez ou bouclez une macro toutes les X minutes dans Excel
Le code VBA suivant peut vous aider à répéter une macro toutes les X minutes dans Excel. Veuillez faire comme suit.
1. presse autre + F11 en même temps pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2. dans le Microsoft Visual Basic pour applications fenêtre, veuillez cliquer insérer > Module. Ensuite, copiez et collez le code VBA ci-dessous dans le Code la fenêtre. Voir la capture d'écran:
Code VBA: répétez ou bouclez une macro toutes les X minutes dans 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 Sub
Notes: Dans le code, veuillez remplacer cette ligne 'Insérez votre code ici avec le code, vous exécuterez toutes les X minutes.
3. appuie sur le F5 clé pour exécuter le code. Dans le popping Kutools for Excel boîte de dialogue, veuillez entrer l'intervalle de temps sur lequel vous répéterez la macro, puis cliquez sur le bouton OK bouton. Voir la capture d'écran:
À partir de maintenant, la certaine macro s'exécutera à plusieurs reprises toutes les 5 minutes dans votre classeur.
Notes: Si vous devez arrêter l'exécution de la macro et modifier l'intervalle du cycle, veuillez copier le code VBA ci-dessous dans le même Module fenêtre et appuyez sur F5 clé pour exécuter le code. Ensuite, la macro sera arrêtée, veuillez réexécuter le code ci-dessus pour spécifier un nouvel intervalle.
Code VBA: arrêter l'exécution de la macro
Sub ExitReRunMacro()
SaveSetting "Kutools", "Macro", "min", "Exit"
End Sub
Office Tab - Navigation par onglets, modification et gestion des classeurs dans Excel:
Office Tab apporte l'interface à onglets telle qu'elle apparaît dans les navigateurs Web tels que Google Chrome, les nouvelles versions d'Internet Explorer et Firefox à Microsoft Excel. Ce sera un outil permettant de gagner du temps et irremplaçable dans votre travail. Voir la démo ci-dessous :
Articles connexes:
- Comment répéter des lignes lors du défilement d'une feuille de calcul dans Excel?
- Comment répéter la dernière ou la précédente action dans Excel?
- Comment imprimer des lignes à plusieurs reprises au bas de chaque page imprimée dans Excel?
- Comment répéter une valeur de cellule jusqu'à ce qu'une nouvelle valeur soit vue ou atteinte dans Excel?
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!