XL 2016 Lister l'absences des salaries sur plusieurs jours

[eduraiss]

Bonjour le forum

Suite a une demande de lister les salaries présent sur une feuille
pierre jean m'avait développer un code qui fonctionne parfaitement
il lister les salaries dans une colonne par rapport à un jour choisi
mon besoin se complique dans le sens ou j'aurais besoin du même système mais sur toues les feuilles du fichier étant des jours de semaine

Je joins un fichier

Merci a vous

 

[eduraiss]

Pardon colonne G H I J

 

[pierrejean]

Re
Ton fichier a-t-il plus de pages que l'exemple ?

 

[eduraiss]

oui il 3 pages de plus
codedate
exeption
groupes semaine

Il me donne les adresses mais elles sont en partie erroné en colonnes F
MA POMME I6
En I6 sur le feuille du lundi c'est PAULEDO
Les autres colonnes c'est parfait

 

[pierrejean]

Re
Regarde en I6 des autres pages !!!
et teste cette version

 

[eduraiss]

Re j'ai testé la version même problème
hop il a a une feuille en plus des trois autres
semaine 18
Par contre j'ai supprimé toutes les feuilles sauf
présence salaries
lundi
mardi
mercredi
jeudi
vendredi
Et la cela fonctionne égalité dans toutes les colonnes
Est-ce que le code va bien chercher dans la feuille lundi uniquement?

Je dirais oui mais je ne suis pas assez calé sur le sujet

 

[eduraiss]

Apres si il faut mettre en F1 G1 H1 I1 J1

Le noms des feuilles cela peut se faire
Je changerais toutes les semaines, c'est pas trés grave

 

[pierrejean]

Re
dernière version

 

[eduraiss]

En rajoutant une feuille
le problème se voit
Voir fichier

 

[eduraiss]

hop

 

[eduraiss]

bug dans mon fichier
Cells(3, c.Column).Resize(appeler.Count) = Application.Transpose(appeler.keys)

 

[eduraiss]

bug régler
Je pense que c'est bon

Je teste mais ça sens bon

 

[pierrejean]

Re
Dans la version V1 la page Lundi avait une Majuscule celle-ci une minuscule d'ou le bug

 

[eduraiss]

C'est bon
J'avais vu le bug et corrigé

Super merci pierrejean ça marche du tonnerre

Merci pour tout le temps que vous avez passé à solutionner mon problème, c'est vraiment très sympa de votre part
Cordialement
PS: j'identifie a résolu