Comment lancer un bout de code toutes les minutes ?
7 réponses
Txl
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc()
ActiveSheet.Cells(7, 5).Calculate
End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Modeste
Bonsour® Txl wrote:
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part,
le gros inconvénient c'est qu'il faille informer Excel que ce code ne doit etre actif que pour le classeur en question et ne doit plus etre éxécuter lorsque l'on quitte l'application - il faut définir une variable Public "ProchainCalcul" as double à mettre en tete d'un module standard - définir la valeur de "ProchainCalcul" lorsque l'on active la proc clc - activer la proc clc dés que l'on active la feuille en question -désactiver le prochain calcul lorsque que l'on quitte la feuille ou le classeur
'------------soit dans un module standard : '================== Public ProchainCalcul as Double ' a placer au début du module avant les procs et fonctions
Sub Clc() ' ----------recalcul et reprogrammation ' ---------c'est ici que l'on défini la fréquence de recalcul (Timevalue("hh:mm:ss") ProchainCalcul = Now + timevalue("0:01") ActiveSheet.Cells(7, 5).Calculate '--------programmation du prochain recalcul Application.OnTime EarliestTime:=ProchainCalcul, Procedure:="Clc" End Sub
Sub Stop_clc() ' ------arret reprogrammation On Error Resume Next Application.OnTime EarliestTime:=ProchainCalcul, Procedure:="Clc", Schedule:úlse End Sub '=========================== '--------dans le module de la feuille concernée : Private Sub Worksheet_Activate() '------ recalcul Clc End Sub
Private Sub Worksheet_Deactivate() '-----désactivation reprogrammation '-----nécessaire si l'on a d'autres classeurs actifs Stop_Clc End Sub '========================= ' --------dans le module thisworkbook : Private Sub Workbook_BeforeClose(Cancel As Boolean) ' ----désactivation reprogrammation Stop_Clc End Sub
@+
-- n'oubliez pas les FAQ : http://www.excelabo.net http://dj.joss.free.fr/faq.htm http://www.faqoe.com http://faqword.free.fr -- Feed Back http://viadresse.com/?94912042
Bonsour®
Txl wrote:
Sub clc()
ActiveSheet.Cells(7, 5).Calculate
End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans
intervention de ma part,
le gros inconvénient c'est qu'il faille informer Excel que ce code ne doit
etre actif que pour le classeur en question et ne doit plus etre éxécuter
lorsque l'on quitte l'application
- il faut définir une variable Public "ProchainCalcul" as double
à mettre en tete d'un module standard
- définir la valeur de "ProchainCalcul" lorsque l'on active la proc clc
- activer la proc clc dés que l'on active la feuille en question
-désactiver le prochain calcul lorsque que l'on quitte la feuille ou le
classeur
'------------soit dans un module standard :
'================== Public ProchainCalcul as Double ' a placer au début du module avant les
procs et fonctions
Sub Clc() ' ----------recalcul et reprogrammation
' ---------c'est ici que l'on défini la fréquence de recalcul
(Timevalue("hh:mm:ss")
ProchainCalcul = Now + timevalue("0:01")
ActiveSheet.Cells(7, 5).Calculate
'--------programmation du prochain recalcul
Application.OnTime EarliestTime:=ProchainCalcul, Procedure:="Clc"
End Sub
Sub Stop_clc() ' ------arret reprogrammation
On Error Resume Next
Application.OnTime EarliestTime:=ProchainCalcul, Procedure:="Clc",
Schedule:úlse
End Sub
'=========================== '--------dans le module de la feuille concernée :
Private Sub Worksheet_Activate() '------ recalcul
Clc
End Sub
Private Sub Worksheet_Deactivate() '-----désactivation reprogrammation
'-----nécessaire si l'on a d'autres classeurs actifs
Stop_Clc
End Sub
'========================= ' --------dans le module thisworkbook :
Private Sub Workbook_BeforeClose(Cancel As Boolean) ' ----désactivation
reprogrammation
Stop_Clc
End Sub
@+
--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
--
Feed Back
http://viadresse.com/?94912042
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part,
le gros inconvénient c'est qu'il faille informer Excel que ce code ne doit etre actif que pour le classeur en question et ne doit plus etre éxécuter lorsque l'on quitte l'application - il faut définir une variable Public "ProchainCalcul" as double à mettre en tete d'un module standard - définir la valeur de "ProchainCalcul" lorsque l'on active la proc clc - activer la proc clc dés que l'on active la feuille en question -désactiver le prochain calcul lorsque que l'on quitte la feuille ou le classeur
'------------soit dans un module standard : '================== Public ProchainCalcul as Double ' a placer au début du module avant les procs et fonctions
Sub Clc() ' ----------recalcul et reprogrammation ' ---------c'est ici que l'on défini la fréquence de recalcul (Timevalue("hh:mm:ss") ProchainCalcul = Now + timevalue("0:01") ActiveSheet.Cells(7, 5).Calculate '--------programmation du prochain recalcul Application.OnTime EarliestTime:=ProchainCalcul, Procedure:="Clc" End Sub
Sub Stop_clc() ' ------arret reprogrammation On Error Resume Next Application.OnTime EarliestTime:=ProchainCalcul, Procedure:="Clc", Schedule:úlse End Sub '=========================== '--------dans le module de la feuille concernée : Private Sub Worksheet_Activate() '------ recalcul Clc End Sub
Private Sub Worksheet_Deactivate() '-----désactivation reprogrammation '-----nécessaire si l'on a d'autres classeurs actifs Stop_Clc End Sub '========================= ' --------dans le module thisworkbook : Private Sub Workbook_BeforeClose(Cancel As Boolean) ' ----désactivation reprogrammation Stop_Clc End Sub
@+
-- n'oubliez pas les FAQ : http://www.excelabo.net http://dj.joss.free.fr/faq.htm http://www.faqoe.com http://faqword.free.fr -- Feed Back http://viadresse.com/?94912042
Daniel
Bonjour. Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas. Cordialement. Daniel "Txl" a écrit dans le message de news:
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()
Merci d'avance
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
Bonjour.
Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as
fait, dis-moi en quoi ma réponse ne te satisfait pas.
Cordialement.
Daniel
"Txl" <nobody@nowhere.com> a écrit dans le message de news:
op.s0doiirnarkwbw@jc...
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les
minutes (Encore merci)
Sub clc()
ActiveSheet.Cells(7, 5).Calculate
End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans
intervention de ma part, un truc avec while wend en boucle infinie par
exemple qui me lancerait le sub clc()
Bonjour. Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas. Cordialement. Daniel "Txl" a écrit dans le message de news:
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()
Merci d'avance
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
Modeste
Bonsour® ;o))) Daniel wrote:
Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas.
en effet ;o))) BIS REPETITA PLACENT ....
-- n'oubliez pas les FAQ : http://www.excelabo.net http://dj.joss.free.fr/faq.htm http://www.faqoe.com http://faqword.free.fr -- Feed Back http://viadresse.com/?94912042
Bonsour®
;o)))
Daniel wrote:
Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu
l'as
fait, dis-moi en quoi ma réponse ne te satisfait pas.
en effet ;o)))
BIS REPETITA PLACENT
....
--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
--
Feed Back
http://viadresse.com/?94912042
Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas.
en effet ;o))) BIS REPETITA PLACENT ....
-- n'oubliez pas les FAQ : http://www.excelabo.net http://dj.joss.free.fr/faq.htm http://www.faqoe.com http://faqword.free.fr -- Feed Back http://viadresse.com/?94912042
Txl
Ben j'ai copié ton module de code dans le VBA de excel mais je voudrais que ca se lance tout seul et ne pas avoir à utiliser F9, ton code me satisfait pleinement et encore merci pour ca, mais je voudrais l'avoir en automatique car les utilisateurs finaux sont un peu "novices" et je voudrais leur macher le travail autant que possible.
Donc je cherche juste un système d'automatisation de ton code.
Bonjour. Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas. Cordialement. Daniel "Txl" a écrit dans le message de news:
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()
Merci d'avance
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
Ben j'ai copié ton module de code dans le VBA de excel mais je voudrais que ca se lance tout seul et ne pas avoir à utiliser F9, ton code me satisfait pleinement et encore merci pour ca, mais je voudrais l'avoir en automatique car les utilisateurs finaux sont un peu "novices" et je voudrais leur macher le travail autant que possible.
Donc je cherche juste un système d'automatisation de ton code.
Bonjour.
Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as
fait, dis-moi en quoi ma réponse ne te satisfait pas.
Cordialement.
Daniel
"Txl" <nobody@nowhere.com> a écrit dans le message de news:
op.s0doiirnarkwbw@jc...
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les
minutes (Encore merci)
Sub clc()
ActiveSheet.Cells(7, 5).Calculate
End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans
intervention de ma part, un truc avec while wend en boucle infinie par
exemple qui me lancerait le sub clc()
Ben j'ai copié ton module de code dans le VBA de excel mais je voudrais que ca se lance tout seul et ne pas avoir à utiliser F9, ton code me satisfait pleinement et encore merci pour ca, mais je voudrais l'avoir en automatique car les utilisateurs finaux sont un peu "novices" et je voudrais leur macher le travail autant que possible.
Donc je cherche juste un système d'automatisation de ton code.
Bonjour. Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas. Cordialement. Daniel "Txl" a écrit dans le message de news:
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()
Merci d'avance
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
Txl
Bonjour,
Pris d'un doute je suis passé par google groups et j'ai trouvé ta réponse que le serveur de news de free ne m'a pas envoyé.
Donc mille mercis, tout marche bien et désolé pour la confusion....
Saleté de serveur de free :-)
Bonjour. Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas. Cordialement. Daniel "Txl" a écrit dans le message de news:
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()
Merci d'avance
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
Bonjour,
Pris d'un doute je suis passé par google groups et j'ai trouvé ta réponse que le serveur de news de free ne m'a pas envoyé.
Donc mille mercis, tout marche bien et désolé pour la confusion....
Saleté de serveur de free :-)
Bonjour.
Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as
fait, dis-moi en quoi ma réponse ne te satisfait pas.
Cordialement.
Daniel
"Txl" <nobody@nowhere.com> a écrit dans le message de news:
op.s0doiirnarkwbw@jc...
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les
minutes (Encore merci)
Sub clc()
ActiveSheet.Cells(7, 5).Calculate
End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans
intervention de ma part, un truc avec while wend en boucle infinie par
exemple qui me lancerait le sub clc()
Pris d'un doute je suis passé par google groups et j'ai trouvé ta réponse que le serveur de news de free ne m'a pas envoyé.
Donc mille mercis, tout marche bien et désolé pour la confusion....
Saleté de serveur de free :-)
Bonjour. Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas. Cordialement. Daniel "Txl" a écrit dans le message de news:
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()
Merci d'avance
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
Daniel
Ca se lance tout seul à l'ouverture du classeur. Donc après avoir copié le code, enregistre et ferme le classeur, puis rouvre-le. Regarde le classeur à l'adresse : http://cjoint.com/?lrl4nSp6mo Tu verras la répartition des macros. Daniel "Txl" a écrit dans le message de news:
Ben j'ai copié ton module de code dans le VBA de excel mais je voudrais que ca se lance tout seul et ne pas avoir à utiliser F9, ton code me satisfait pleinement et encore merci pour ca, mais je voudrais l'avoir en automatique car les utilisateurs finaux sont un peu "novices" et je voudrais leur macher le travail autant que possible.
Donc je cherche juste un système d'automatisation de ton code.
Bonjour. Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas. Cordialement. Daniel "Txl" a écrit dans le message de news:
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()
Merci d'avance
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
Ca se lance tout seul à l'ouverture du classeur. Donc après avoir copié le
code, enregistre et ferme le classeur, puis rouvre-le.
Regarde le classeur à l'adresse :
http://cjoint.com/?lrl4nSp6mo
Tu verras la répartition des macros.
Daniel
"Txl" <nobody@nowhere.com> a écrit dans le message de news:
op.s0dr5906arkwbw@jc...
Ben j'ai copié ton module de code dans le VBA de excel mais je voudrais
que ca se lance tout seul et ne pas avoir à utiliser F9, ton code me
satisfait pleinement et encore merci pour ca, mais je voudrais l'avoir en
automatique car les utilisateurs finaux sont un peu "novices" et je
voudrais leur macher le travail autant que possible.
Donc je cherche juste un système d'automatisation de ton code.
Bonjour.
Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu
l'as
fait, dis-moi en quoi ma réponse ne te satisfait pas.
Cordialement.
Daniel
"Txl" <nobody@nowhere.com> a écrit dans le message de news:
op.s0doiirnarkwbw@jc...
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les
minutes (Encore merci)
Sub clc()
ActiveSheet.Cells(7, 5).Calculate
End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans
intervention de ma part, un truc avec while wend en boucle infinie par
exemple qui me lancerait le sub clc()
Ca se lance tout seul à l'ouverture du classeur. Donc après avoir copié le code, enregistre et ferme le classeur, puis rouvre-le. Regarde le classeur à l'adresse : http://cjoint.com/?lrl4nSp6mo Tu verras la répartition des macros. Daniel "Txl" a écrit dans le message de news:
Ben j'ai copié ton module de code dans le VBA de excel mais je voudrais que ca se lance tout seul et ne pas avoir à utiliser F9, ton code me satisfait pleinement et encore merci pour ca, mais je voudrais l'avoir en automatique car les utilisateurs finaux sont un peu "novices" et je voudrais leur macher le travail autant que possible.
Donc je cherche juste un système d'automatisation de ton code.
Bonjour. Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas. Cordialement. Daniel "Txl" a écrit dans le message de news:
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()
Merci d'avance
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
Clément Marcotte
Bonjour,
Saleté de serveur de free :-)
Tu peux utiliser directement le serveur de Microsoft.
Tu t'ouvres un nouveau compte de news dans ton lecteur de news avec le serveur:
Pris d'un doute je suis passé par google groups et j'ai trouvé ta réponse que le serveur de news de free ne m'a pas envoyé.
Donc mille mercis, tout marche bien et désolé pour la confusion....
Bonjour. Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas. Cordialement. Daniel "Txl" a écrit dans le message de news:
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()
Merci d'avance
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
-- Email contact
http://cerbermail.com/?ltQ8eCFmRa
Bonjour,
Saleté de serveur de free :-)
Tu peux utiliser directement le serveur de Microsoft.
Tu t'ouvres un nouveau compte de news dans ton lecteur de news avec le
serveur:
"Txl" <nobody@nowhere.com> a écrit dans le message de news:
op.s0dsgnkparkwbw@jc...
Bonjour,
Pris d'un doute je suis passé par google groups et j'ai trouvé ta réponse
que le serveur de news de free ne m'a pas envoyé.
Donc mille mercis, tout marche bien et désolé pour la confusion....
Bonjour.
Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu
l'as
fait, dis-moi en quoi ma réponse ne te satisfait pas.
Cordialement.
Daniel
"Txl" <nobody@nowhere.com> a écrit dans le message de news:
op.s0doiirnarkwbw@jc...
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les
minutes (Encore merci)
Sub clc()
ActiveSheet.Cells(7, 5).Calculate
End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans
intervention de ma part, un truc avec while wend en boucle infinie par
exemple qui me lancerait le sub clc()
Pris d'un doute je suis passé par google groups et j'ai trouvé ta réponse que le serveur de news de free ne m'a pas envoyé.
Donc mille mercis, tout marche bien et désolé pour la confusion....
Bonjour. Si tu ne l'as pas fait, regarde ma réponse à ton précédent post. Si tu l'as fait, dis-moi en quoi ma réponse ne te satisfait pas. Cordialement. Daniel "Txl" a écrit dans le message de news:
Bonjour,
On m'a passé un bout de code qui force un recalcul de cellule toutes les minutes (Encore merci)
Sub clc() ActiveSheet.Cells(7, 5).Calculate End Sub
Et je voudrais savoir comment éxecuter ce code toutes les minutes sans intervention de ma part, un truc avec while wend en boucle infinie par exemple qui me lancerait le sub clc()