Tri automatiques par onglet et jours du mois

[arvin]

bonjour Pierre Jean , JLCD et le forum !

ai beaucoup avancé avec vos idées mais là cette ligne se bloque et je ne vois pas pourquoi :

If Not f_exist(jour) Then Sheets.Add.Name = jour

la macro "essai" doit repercuter le noms des agents qui travaillent du 01 au 31 juillet par onglet
comprends pas pourquoi cela ne fonctionne pas

merci de m'aider

à +

 

[Compte Supprimé 979]

Re : Tri automatiques par onglet et jours du mois

Salut arvin

Tu as 1 espace devant tes dates, du coup

jour = Split(.Range("A" & n), " ")(0)

te renvoie une valeur vide

2 solutions :
1) supprimer les espaces devant les dates
2) changer le code par

jour = Split(.Range("A" & n), " ")(1)

A+

 

[arvin]

Re : Tri automatiques par onglet et jours du mois

bonjour BrunoM45,

ah oui merci beaucoup : ai enlevé l'espace devant la date et changer le code (macro document1) mais regarde ce que cela me donne en faisant la macro (document2) c'est tout bizarre le résultat
peux tu regarder ?
bonne journée

 

[Compte Supprimé 979]

Re : Tri automatiques par onglet et jours du mois

Re,

Ton tableau de date, n'est jamais le même !?
Un coup tu as le nom du jour devant, un coup non, lequel est le bon ??

A+

 

[arvin]

Re : Tri automatiques par onglet et jours du mois

rebonjour, en fait le bon document c'est celui ci : quand tu cliques sur la macro "essaie" , je souhaite qu'il place tous les noms des personnes qui ont un "1" en fonction des jours
là ça marche pas , il me met les jours apparemment ...
peux tu m'aider ?

 

[Compte Supprimé 979]

Re : Tri automatiques par onglet et jours du mois

Re,

Ca y est je pense avoir compris 😛😉

Ton problème venait des tests que tu fais

If InStr(jours, (Split(.Range("A" & n), " ")(0) & ",")) = 1 Then

If .Range("E" & n) <> "" Then

Ci-joint le fichier modifié

Dis-nous

A+

 

[arvin]

Re : Tri automatiques par onglet et jours du mois

oui effectivement c'est pile poil ce que je voulais
un énoooooorme merci !
longue vie au forum et aux excelliens qui nous aident
merci Bruno M45

 

[Staple1600]

Re : Tri automatiques par onglet et jours du mois

Bonsoir à tous

Je passais par ici par hasard, alors je glisse juste ceci comme info (même si cela ne change rien d'important)
jour = Split(.Range("A" & n), " ")(1)
peut simplement s'écrire
jour = Split(.Range("A" & n))(1) ' l'espace étant le séparateur par défaut de Split
Par précaution personnellement, j'ajouterai
jour = Split(.Range("A" & n).Text)(1)

Voili, voilou , bonne soirée à tous

 

[arvin]

Re : Tri automatiques par onglet et jours du mois

bonjour Staple1600, j'ai essayé mais il ne me cree qu'un onglet juillet
mais c'est pas grave le code de BrunoM45 fonctionne à merveille
merci encore
ps : ai réussi à trier les onglets par odre alphanumérique (code Daniel MAYER ) : trop top
à bientôt

 

[arvin]

Re : Tri automatiques par onglet et jours du mois

bonjour BrunoM45,

la macro fonctionnait à merveille et là ça plante : plutôt il me trie sur 12 jours de mars ...
(macro suppression et après macro essai)
bizarre , peux tu regarder stp
merci beaucoup et bonne journée