Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 Macros se désactivent pendant utilisation du classeur

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,

Me re-voici pour un souci que nous avons depuis longtemps.
J'avais déjà posé la question mais je m'étais mal exprimé (ça m'arrive souvent LOL) et je n'avais pas obtenu de solution.
C'est un vrai problème de fonctionnement et je me tourne à nouveau vers vous.

Le cadre de ma question :
Je travaille avec des commerciales qui travaillent chez elles.
Chaque Commerciale à son classeur de prospection.
Chaque matin, j'envoie le classeur du jour à chaque Commerciale (via skype).
Quand elles l'ouvre la première fois, elle activent les macros.
Jusque là tout va bien

C'est l'utilisation qui pose souvent problème :
Le classeur est truffé de codes indispensables au bon fonctionnement (mon usine à gaz comme dirait job75 LOL)
Tout ou presque est automatisé par codes.

Mais voilà :
On a souvent tendance à utiliser un classeur excel truffé de codes comme un logiciel et ce n'est pas un logiciel.
Souvent, mes commerciales cliquant soit :
- trop vite,
- ou actionnant un bouton avant que l'action précédente soit terminée,
- ou il ne faut pas, .............. font beuguer et les macros se trouvent désactivées.
Elles ne s'en aperçoivent pas ce qui pose un gros souci de fonctionnement et créé des erreurs etc....

Ma question (sans trop d'espoir) :
Est-il possible, qu'à l'instant ou une fausse manœuvre ou des clics trop rapides désactivent les macros, qu'un message d'alerte apparaisse ?

Voilà qui nous rendrait un très grand service sachant que dans la feuille concernée, j'ai mis un bouton pour ré-activer les macros.
Voilà une bouteille à la mer .... mais avec des magiciens, l'espoir est permis

Je ne peux pas mettre de fichier test mais si cela vous semble nécessaire, j'essaierai d'en faire un.
Avec mes remerciements,
Je vous souhaite à toutes et à tous une belle journée,
Amicalement,
lionel,
 
Dernière édition:

job75

XLDnaute Barbatruc
Bonjour Lionel,

Tu mélanges tout

Application.EnableEvents = False ne désactive pas les macros mais les évènements.

Si pour une raison ou une autre cette instruction est exécutée on peut bien sûr corriger par :
VB:
Sub ReactiveMacros()
On Error Resume Next
Application.OnTime t, "ReactiveMacros", , False
t = Now + 5 / 86400 'délai de 5 secondes
Application.OnTime t, "ReactiveMacros"
Application.EnableEvents = True 'réactive les évènements
End Sub
Cela dit si Application.EnableEvents a été mis (définitivement) à False c'est que le code est mal fichu, il suffit de le corriger !!!

A+
 

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour Gérard, le Forum,

J'ai intégralement copié le nouveau code post #16
Mais ça ne réactive pas.

Désolé d'y revenir
Je joins le fichier test que j'ai fait.

Bonne journée à toutes et à tous,
lionel
 

Pièces jointes

  • Réactive les macros(2)_Job.xlsm
    36.3 KB · Affichages: 7

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Mais non LOL, je l'avais bien mise mais elle ne fonctionne pas, c'est pour ça que je l'avais désactivée dans mon fichier post#18

Je le remets avec la macro du post#16 activée

Ou alors je deviens chèvre et j'en suis désolé
 

Pièces jointes

  • Réactive les macros_Job_test.xlsm
    37.2 KB · Affichages: 6
Dernière édition:

job75

XLDnaute Barbatruc
Bonjour Lionel, le forum,

Dans ton dernier fichier la macro "ReactiveMacros" doit être dans un module standard et pas dans ThisWorkbook.

C'est ce que tu avais demandé sur l'autre fil !

A+
 

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Evidemment quand je fais comme tu le dis ça marche (le pire est que je n'en doute pas depuis tjrs ).
Dsl encore gérard mais j'ai un boulot de fou et dérangé à chaque instant de 6h30 le matin jusqu'à plus de 20 heures le soir.
Merci gérard pour ta patience
Je joins le fichier qui fonctionne,
lionel,
 

Pièces jointes

  • Réactive les macros_Job_test.xlsm
    36.2 KB · Affichages: 4
Dernière édition:

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…