Macro Excel, execution interrompue

Résolu/Fermé
PlacageGranby Messages postés 393 Date d'inscription mercredi 26 mars 2014 Statut Membre Dernière intervention 7 mars 2019 - 28 août 2014 à 16:24
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 7 nov. 2014 à 15:13
Bonjour,

Une collèque a l'erreur Execution interrompue sur différentes macro.
Donc seulement besoin de cliquer sur continuer, mais vu que ce n'est pas une power-user, c'est un stress inutile et pour sur, un call pour la technique.

Le fichier problème est sur le réseau, et s'exécute normalement sur les autres ordinateur.
Nous avons tous les même version de windows (xp), et le même excel (2010).

Lorsque la collègue, redémarre son ordinateur, les macro recommence à s'exécuter normalement (pour quelques jours).

Solution simple, redémarrer l'ordi à tout les jours, mais sérieusement, est-ce un problème connu et y a t-il une mise a jour ou une astuce niveau code qui peut résoudre ca ?

L'erreur dans la macro survenait à Range("A3").select
et si on élimine cette ligne de code (qui est principalement esthétique), l'erreur survient à end sub.

6 réponses

PlacageGranby Messages postés 393 Date d'inscription mercredi 26 mars 2014 Statut Membre Dernière intervention 7 mars 2019 26
28 août 2014 à 16:35
Surtout que cette macro ne cause aucun problème sur les autres ordinateur du réseau.
1
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 776
7 nov. 2014 à 14:09
« Et ca bug sur le Range("A3").Select » Quel est le message ?

Ce code est-il dans un module standard ou dans un module de feuille ?
0
PlacageGranby Messages postés 393 Date d'inscription mercredi 26 mars 2014 Statut Membre Dernière intervention 7 mars 2019 26
7 nov. 2014 à 14:28
Dans un module standard.
Je n'ai rien modifié au code pour l'instant, et l'erreur n'est pas survenu depuis le 28 aout.
Et l'utilisatrice entre des données à chaque jour.
Donc, je crois que c'est un bug bizarre qui ne se reproduit pas automatiquement, donc très difficile à corrigé.
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 776
7 nov. 2014 à 15:00
Dans un module standard, pour éviter ce genre de problème, il vaut mieux préciser le nom de la feuille sur laquelle le code s'applique. De même, il vaut mieux éviter les "Select" inutiles :
Sub Bouton_trier_date()
With Worksheets("Feuil1")
  .Range("A3:N" & i).Sort Key1:=.Range("B:B"), Order1:=xlAscending, _
                          Key2:=.Range("F:F"), Order2:=xlAscending, _
                          Header:=xlNo, OrderCustom:=1, MatchCase:=True, _
                          Orientation:=xlTopToBottom
  'Et seulement si c'est nécessaire, activer la feuille et la cellule :
  .Activate
  .Range("A3").Select
End With
End Sub

Ce n'est pas nécessaire dans un module de feuille car la feuille est implicite.
Cordialement
Patrice
0
PlacageGranby Messages postés 393 Date d'inscription mercredi 26 mars 2014 Statut Membre Dernière intervention 7 mars 2019 26
7 nov. 2014 à 15:03
Merci
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 776
Modifié par Patrice33740 le 7/11/2014 à 15:15
Il se peut aussi que le problème vienne d'une action de l'utilisateur pendant le déroulement de la macro. Pour éviter toute interaction de l'utilisateur tu peux utiliser
Sub Macro()
  Application.Interactive = False
    'Ici le code de la macro
    ' ....
  Application.Interactive = True
End Sub:



Edit : Attention, il faut que le code soit "bétonné"

Patrice
0