alerte sur l' heure

[tany]

Bonjour,
je viens vous soumettre un petit problème...
je n'arrive pas a créer une alerte 10 minutes avant le départ
je n'ai pas compris qqch mais quoi ?
Merci et bonne soirée

 

[DoubleZero]

Re : alerte sur l' heure

Bonjour, tany, le Forum,

Qu'en est-il des "0000", ici 🙄 ?

 

[tany]

Re : alerte sur l' heure

ça marche impec, c'était on ne peut plus juste
ici on est toujours assuré d' être remis sur pieds.
merci encore
tany

 

[Modeste geedee]

Re : alerte sur l' heure

Bonsour®

1 - quel événement actualise l'heure courante ???
2 - la cellule D4 sera toujours > à D7 :
D4 contient l'heure + la date
D7 ne contient que l'heure

 

[tany]

Re : alerte sur l' heure

bonjour,

je pensais créer l'évènement en faisant F9...
mais la remarque de l'heure seule c'est ça qui fait que...
il me faut revoir cela autrement.
merci et bonne journée

 

[Modeste geedee]

Re : alerte sur l' heure

Bonsour®

utiliser une procédure OnTime exécutée toute les minutes pour actualiser la cellule D4 : =Mod(Maintenant();1)
ne pas oublier une variable booléenne pour activer ou pas la proc
ne pas oublier non plus l'arret de la proc lors de la fermeture du classeur.


🙄
il serait plus simple d'activer le planificateur de tâches Windows.

 

[tany]

Re : alerte sur l' heure

re bonjour,
je n'avais donner que le principe mais je ne sais pas comment m'y prendre alors j' explique un peu mieux où je veux en venir
je souhaite faire un tableau des vols avions au départ
il me faut donc une pendule mise à l' heure (dans mon exemple D4)
puis les vols n° destinations etc... et l'heure de départ (D7)
et c'est là que je cherche à faire le message (E7) 30 minutes avant "embarquement" 5 minutes avant "fermé" etc...
je ne vois même pas comment m'y prendre
Merci si vous pouvez me guider pour commencer correctement merci. A +

 

[tany]

Re : alerte sur l' heure

re,
j' ai utilisé une procédure ontime et ça marche impeccable
l'évènement met à jour les messages, tout baigne !
merci de m'avoir mis sur les rails
je vais faire une longue liste des vols journaliers et afficher les 10 prochains suivant l'heure,
en bref rien que du plaisir...

 

[tany]

Re : alerte sur l' heure

tout fonctionne mais ma procédure marque le temps toutes les secondes
comment arranger le code pour toutes les minutes seulement ?
ci joint mon code :
Public Sub Chrono()
' Programmation de l'evenement toutes les secondes
Temps = Now + TimeValue("00:00:01")
Application.OnTime Temps, "Chrono"
Sheets("Feuil1").Range("M3").Value = Time

End Sub

merci d'avance

 

[Modeste geedee]

Re : alerte sur l' heure

Bonsour®

nommer une cellule : Alerte
que l'on mettra soit à VRAI soit à FAUX pour inhiber ou pas la macro chrono

Public Sub Chrono()
Dim newtime As Double
 ' Programmation de l'evenement toutes les x secondes
 If [alerte] = True Then
 'newtime = Now + TimeValue("00:00:01") 'seconde
 'newtime = Now + TimeValue("00:00:05")' 5 sec
 'newtime = Now + TimeValue("00:00:15")'15 sec
 'newtime = Now + TimeValue("00:00:30")'30 sec
 newtime = Now + TimeValue("00:01:00")' 1mn
 Application.OnTime newtime, "Chrono"
 Sheets("Feuil1").Range("M3").Value = Time
 Beep
 End If

 End Sub

 

[tany]

Re : alerte sur l' heure

Bonjour,

Merci bien, je vais testé mais je suis sûr que c' est bon.
A + et bon weekend

 

[tany]

Re : alerte sur l' heure

Bonjour du jeudi,

Tout fonctionne mais j'ai voulu rajouter une mise à jour automatique en profitant du chrono
et ça bloque, je ne vois pas pourquoi...
Un conseil svp, merci

 

[tany]

Re : alerte sur l' heure

bonjour,
j'ai trouvé en mettant dans module ça marche et en fait c'est logique
on ne peut pas aller chercher un sub.
j'ai mis du temps a le comprendre !
bonne journée.