reconnaissance de la journéer par rapport à la date

[philmaure]

bonjour,
Dans un fichier j'ai une macro par journée (lundi à vendredi)
Est il possible par macro de définir la journée par rapport à la date du jour. En d'autres terme nous sommes le 24 novembre 2011 ce qui correspond à un jeudi et donc je lance la macro du jeudi.

J'ai joins un fichier allégé mais je pense que tout est dans le texte.
Merci pour vos solutions.
Cdlt
Philippe

 

[Pierrot93]

Re : reconnaissance de la journéer par rapport à la date

Bonjour,

ton classeur est protégé par mot de passe, je ne peux y accéder...

bonne journée
@+

 

[philmaure]

Re : reconnaissance de la journéer par rapport à la date

desolé le mdp est mp

 

[Pierrot93]

Re : reconnaissance de la journéer par rapport à la date

Re,

essayce ceci, si j'ai bien compris :

Option Explicit
Sub test()
Application.Run WeekdayName(Weekday(Date, 2), , 2)
End Sub
Sub jeudi()
MsgBox "jeudi"
End Sub
Sub mercredi()
MsgBox "mercredi"
End Sub

 

[philmaure]

Re : reconnaissance de la journéer par rapport à la date

merci pour ta reponse. par contre on obtient bien l'indication de la journée mais pas le lancement de la macro correspondante.
Dans mon fichier j'ai 5 macro : 1 par journée et je souhaite la

 

[philmaure]

Re : reconnaissance de la journéer par rapport à la date

excuse j'ai des coupes ADSL
je reprend : Dans mon fichier j'ai 5 macro : 1 par journée et je souhaite lancer celle correspondante à la journée.
Je pense que je vais definir la journée a partir de la date dans une cellule de mon classeur puis par macro tester la cellule et lancer la macro correspondante.
Encore merci et bonne a-m
Cdlt
philippe

 

[Pierrot93]

Re : reconnaissance de la journéer par rapport à la date

Re,

pas de problème chez moi, si je lance la macro "test", la macro "jeudi" se lance bien... enfin celle que moi j'ai mise...

 

[MichD]

Re : reconnaissance de la journéer par rapport à la date

Bonjour,

Si je peux me permettre,

Telles que la macro est écrite, les procédures à lancer doivent être dans un MODULE STANDARD. Si pour une raison ou une autre, tu dois placer les procédures à exécuter dans un module Feuille, tu dois indiquer à la procédure le nom la feuille (propriété NAME et non le nom de l'onglet) dans la ligne de code comme ceci :

En supposant que la procédure appelée est dans le module FEUIL1

Sub test()
Application.Run "Feuil1." & WeekdayName(Weekday(Date, 2), , 2)
End Sub

 

[Pierrot93]

Re : reconnaissance de la journéer par rapport à la date

Re,

Si je peux me permettre,

Telles que la macro est écrite, les procédures à lancer doivent être dans un MODULE STANDARD

tu peux, et j'aurais du le préciser effectivement...