Comment exécuter la même macro sur plusieurs feuilles de calcul en même temps dans Excel ?

Dans Excel, vous pouvez exécuter une macro sur une seule feuille de calcul, mais que faire si vous devez appliquer la même macro sur plusieurs feuilles à la fois ? Au lieu de déclencher la macro individuellement pour chaque feuille, vous pouvez l'exécuter sur toutes les feuilles sélectionnées simultanément. Dans ce guide, nous allons vous montrer comment utiliser VBA pour exécuter la même macro sur plusieurs feuilles de calcul de manière plus efficace, vous faisant gagner du temps et des efforts.

Exécuter ou appliquer la même macro sur plusieurs feuilles de calcul en même temps avec du code VBA

Exécuter ou appliquer la même macro sur plusieurs feuilles de calcul en même temps avec du code VBA

Pour exécuter une macro sur plusieurs feuilles sans la déclencher une par une, vous pouvez appliquer le code VBA suivant, veuillez procéder comme suit :

1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insertion > Module, puis collez la macro suivante dans la fenêtre Module.

Code VBA : Exécuter la même macro sur plusieurs feuilles de calcul en même temps :

Sub Dosomething()
    Dim xSh As Worksheet
    Application.ScreenUpdating = False
    For Each xSh In Worksheets
        xSh.Select
        Call RunCode
    Next
    Application.ScreenUpdating = True
End Sub
Sub RunCode()
    'your code here
End Sub

Remarque : Dans le code ci-dessus, copiez et collez votre propre code sans l'en-tête Sub ni le pied de page End Sub entre les scripts Sub Runcode() et End Sub . Voir capture d'écran :

3. Ensuite, placez le curseur sur la première partie de la macro, et appuyez sur la touche F5 pour exécuter le code, et votre code macro sera appliqué feuille par feuille.

Supprimer facilement les macros de plusieurs classeurs

L'outil Supprimer toutes les macros en lot de Kutools pour Excel vous permet de supprimer rapidement les macros de plusieurs classeurs à la fois.

Kutools pour Excel - Boostez Excel avec plus de 300 outils essentiels. Profitez de fonctionnalités IA gratuites en permanence ! Obtenez-le maintenant