Soucis pour exécuter macros

duduleray -  
Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   -
Bonsoir a tous, forum bonsoir,

<config>Windows 10 / Edge 81.0.416.72</Excel 2007>

Quand je lance la macro ci dessous elle fonctionne, mais je n'avais prévu un truc.

je suis obliger d'attendre la fin de la première macro pour voir la
deuxième macro s'afficher.

Peut t'on exécuter deux macros en mème temps ou une autre solution peut etre.

Merci a vous et bon déconfinement.

Bonne soirée a vous

Cdlt Ray


Sub Essai()
       Call Affichage_ChronoCadre_Chrom4_Décompte
       Call MessInfo1
End Sub

4 réponses

  1. NHenry Messages postés 15235 Date d'inscription   Statut Modérateur Dernière intervention   387
     
    En VBA, tu ne peux pas faire d’exécution en parallèle.
    Donc tu dois te contenter d’appels séquentiels.
    1
  2. Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 784
     
    Bonjour,

    Tu peux exécuter deux macros simultanément, par exemple en utilisant OnTime.

    Cet exemple qui démontre les risques et les inconvénients de l'utilisation de Select :
    https://mon-partage.fr/f/aUsDensI/

    1
  3. duduleray
     
    Salut Patrice,

    Merci pour ta réponse, effectivement 37 fois, plus rapide "adieu Select" mais le soucis c'est de savoir coder pour les évités ces "Select"

    Bon app et bonne après midi.

    Cdlt Ray
    0
    1. Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 784
       
      Il y a une méthode très simple : déclarer et utiliser les objets sur lesquels on veut agir.
      0
  4. duduleray
     
    Salut NHenry,

    Merci pour la réponse, j'ai résolu mon soucis

    Je lançais mon chrono de 5 secondes AVANT et afficher le message après.

    Donc logique égal j'ai inverser l'appel des macros et maintenant c'est bon, c'est bète
    je n'avais pas penser, me suis aperçu a l'essai.

    Merci a toi une bonne après midi.

    Cdlt Ray
    0