tri automatique par dates

Re : tri automatique par dates

bonjour PierreJean et le forum,

en fait je reviens vers toi car la macro fonctionne super mais je souhaiterai obtenir une feuille récapitulative qui me repertorie tous les 0,5 , et si possible par jour de la semaine, (c'est l'idée du module 2 mais évidemment cela ne fonctionne pas)
peux tu m'aider ?
merci et bon week end

Re : tri automatique par dates

Re

Voila

Re : tri automatique par dates

un grand merci PierreJean : je regarde cela ce soir mais je suis sur que c'est pile poil ce que je voulais
merci encore pour ta rapidité
le site te doit beaucoup
à bientôt

Re : tri automatique par dates

bonjour Pierrejean : en fait je te sollicite à nouveau car j'aurais souhaité une modification sur la macro
actuellement , la macro trie les onglets par jours de la semaine c'est super
serait il possible de trier les onglets par les jours du mois
bien sur cela ferait donc 30 onglets (ou 31)
l'idée est d'avoir tous les noms des gens qui travaillent par jours
je te joins un bout de fichier (la macro = essai)
merci beaucoup de ton aide

Re : tri automatique par dates

bonjour, c'est bizarre j'ai changé ce paramètre mais cela ne fonctionne pas : je me suis dit que je pourrai faire changeer ce paramètre tous les mois, certes fastidieux mais bon

jours = "mardi 21 decembre,mercredi 22 decembre,vendredi 24 decembre,samedi 25 decembre,dimanche 26 decembre"

Re : tri automatique par dates

Bonjour à tous,

La procédure "Essai" n'est pas présente dans le fichier joint

A + à tous

Re : tri automatique par dates

oups effectivement : merci beaucoup
je pensais pour alleger passer par une fonction Date car sinon il faut que je re ecrivre la macro tous les mois....

Re : tri automatique par dates

ah j'ai avancé un peu : en fait si j'enlève les lund., mar......de chaque ligne , ma macro fonctionne ainsi
"jours = "26,28,29,30,31,"

donc pour enlever les jours ,il faut que j'utilise cette fonction -> =DROITE(A22;NBCAR(A22)-5)
mais comment l'appliquer par macro à chaque cellule qui comprend lund., mard., mercredi .........
merci de votre aide

Re : tri automatique par dates

ah pour supprimer j'ai utilisé cette macro suivante cela tourne
mais la premiere macro ne fonctionne plus maintenantla variable "jours"n'est pas définie .....grrrrr
je vous renvoie le fichier


Columns("A:A").Select
Selection.Replace What:="Lun.", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

Selection.Replace What:="Mar.", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

Selection.Replace What:="Mer.", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

Selection.Replace What:="Jeu.", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

Selection.Replace What:="Ven.", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

Selection.Replace What:="Sam.", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

Selection.Replace What:="Dim.", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

Re : tri automatique par dates

Bonjour, en fait cela marche pas trop : tu parles de procedure ? Comprends pas, elle figure dans l onglet pourtant