Discussion :

[coklin]

Bonjour,


Je voulais savoir comment faire pour désactiver une macro programmée pour se lancer à une heure précise.

Par exemple, j'ai :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.OnTime TimeValue("16:59:30"), "Photo"

A l'ouverture, la macro est programmée pour se lancer à 16:59:30. Je cherche le code pour désactiver cette programmation.


Merci à celui qui acceptera de m'aider.

Coklin

[ucfoutu]

Bonjour,

Si j'ai bien compris :
- Une variable (appelons-la toto) booléenne à portée générale (= False au départ)
- un bouton de commande pour inhiber . Dans son évènement click

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

toto = True

- dans ta macro Photo, en 1ère ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If toto then exit sub

Si ce n'est pas ce que tu voulais dire, explique plus précisément.

Ah oui :! et si tu veux l'inhiber dès le départ (par exemple en fonction d'un cas - date, user, autre....) : tu mets toto à True dès le départ ...

[coklin]

Salut ucfoutu,


Merci je vois ce que tu veux faire. Tu veux déterminer le lancement de la macro en fonction d'une variable boolean qui changera à chaque fois que j'appuie sur un bouton. D'où l'idée de la mettre en public.


Je pensais plus au code correspondant à l'inverse du Application.OnTime, mais cette idée doit fonctionner également.


Je te tiens au courant de l'évolution.


Merci de ton aide,


Coklin

[ucfoutu]

Oui...
L'inverse n'existe évidemment pas..
(Que pourrait être l'inverse, même en langage courant, de "nous prendrons le train à 19 heures"? .... Je ne le vois pas ... mais on peut toujours décider, y compris au denier moment, de ne pas prendre le train prévu ...)

[AlainTech]

Bonjour à tous.

Pour désactiver un OnTime programmé:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Application.OnTime EarliestTime:=TimeValue("16:59:30"), _
    Procedure:="Photo", Schedule:=False

[coklin]

Salut AlainTech,


Merci beaucoup de m'avoir répondu, je vais essayer ta solution.

ucfoutu, je comprends pas pourquoi t'es tjrs aussi compliqué(e). Tu demandes sans cesse des précisions pas forcément utiles, même si c'est très gentil de ta part d'aider.

D'autre part, ce que tu ignores ne signifie pas que cela n'existe pas, AlainTech vient de t'en apporter la preuve flagrante. Au moins, sa réponse te servira également.

Donc merci à toi d'avoir voulu m'aider, et merci à AlainTech pour la rapidité et la simplicité de sa réponse.

Bonne journée,


Coklin

[ucfoutu]

ucfoutu, je comprends pas pourquoi t'es tjrs aussi compliqué(e). Tu demandes sans cesse des précisions pas forcément utiles, même si c'est très gentil de ta part d'aider.

D'autre part, ce que tu ignores ne signifie pas que cela n'existe pas, AlainTech vient de t'en apporter la preuve flagrante. Au moins, sa réponse te servira également.

Euh....
1) - je ne te demandais aucune précision. Je t'en donnais
2) - il va bien falloir que tu utilises une variable booléenne, quelle que soit la solution retenue
3) - ta question était, je te le rappelle, la suivante :

Je voulais savoir comment faire pour désactiver une macro programmée pour se lancer à une heure précise.

Par exemple, j'ai :


Code :
Application.OnTime TimeValue("16:59:30"), "Photo"

A l'ouverture, la macro est programmée pour se lancer à 16:59:30. Je cherche le code pour désactiver cette programmation.

Sans autre précision sur le moment où tu veux inhiber cette macro et/ou les condition d'inhibition..
Mes réponses et mes précisions restent alors d'actualité
Mais fais-en ce que tu veux....

EDIT :
et surtout :
la solution donnée par Alain Tech n'est pas ce que tu disais là :

Je pensais plus au code correspondant à l'inverse du Application.OnTime

...
et à quoi (puisque TU posais la question) j'ai répondu !

[coklin]

Ucfoutu,

Je vais simplement te remercier une dernière fois pour ton aide (pour cette fois-ci et les précédentes).

Peut-être que je ne suis pas assez rigoureux dans mes explications, et c'est pour cela que tu as besoin de précisions. Je tâcherai d'être plus rigoureux lors de mes prochaines questions.


Bonne journée

Coklin