Recherchev doublons

Dranreb

XLDnaute Barbatruc

• 10 Septembre 2015

• #2

Re : Recherchev doublons

Bonjour.

Moi je le ferais en VBA, avec lignes classées par nom/prénom. Cette solutiion vous irait-elle ?

 

Vote positif 0 Vote négatif

Dugenou

XLDnaute Barbatruc

• 10 Septembre 2015

• #3

Re : Recherchev doublons

Bonjour,
Voir PJ avec une formule excel 2013 :

Code:

=SOMME.SI.ENS(janvier!$F$4:$F$13;janvier!$A$4:$A$13;SYNTHESE!$A3;janvier!$C$4:$C$13;9)+SOMME.SI.ENS(janvier!$F$4:$F$13;janvier!$A$4:$A$13;SYNTHESE!$A3;janvier!$C$4:$C$13;10)

ensuite changer janvier en février etc...

si tu n'as pas 2013 alors il faudra passer par un sommeprod

=SOMMEPROD((janvier!$A$4:$A$13=SYNTHESE!$A3)*(janvier!$C$4:$C$13>=9)*janvier!$F$4:$F$13)

Cliquez pour agrandir...

Cordialement

Edit : Bonjour Bernard !

 

Pièces jointes

• lego35.xlsx

  47.4 KB · Affichages: 60
• lego35.xls

  101.5 KB · Affichages: 55

Vote positif 0 Vote négatif

L

lego35

XLDnaute Junior

• 10 Septembre 2015

• #4

Re : Recherchev doublons

Salut Dranreb,

Pour te répondre Oui, mais je sais pas le faire...

Alors si tu veux bien moi je veux.

Cdlt

lego35

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 10 Septembre 2015

• #5

Re : Recherchev doublons

Voici la version en macros.

Bonjour Dugenou

Edit. J'ai oublié de tenir compte du type 9 et 10 seulement.
Je vais corriger…
…voilà, c'est réparé.

 

Pièces jointes

• GrpOrgLego35.xls

  244 KB · Affichages: 71
• GrpOrgLego35.xls

  244 KB · Affichages: 57

Dernière édition: 10 Septembre 2015

Vote positif 0 Vote négatif

L

lego35

XLDnaute Junior

• 10 Septembre 2015

• #6

Re : Recherchev doublons

Re, Dranreb

Merci beaucoup... mais le fichier est introuvable "erreur: Projet Visual Perdu

Tu peux refaire la manip !

Merci

lego35

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 10 Septembre 2015

• #7

Re : Recherchev doublons

Je le re-joins.

 

Pièces jointes

• GrpOrgLego35.xls

  240.5 KB · Affichages: 73
• GrpOrgLego35.xls

  240.5 KB · Affichages: 66

Vote positif 0 Vote négatif

L

lego35

XLDnaute Junior

• 10 Septembre 2015

• #8

Re : Recherchev doublons

Bonsoir Dranreb,

j'ai une chose à dire: trop fort !!

et en plus très rapide !

Je fais quelques essais, mais d'ores et déjà ça semble génial.

Merci pour le temps passé (il semble que cela était un jeu d'enfant pour toi)

Encore merci à toi et au Forum bien sûr

Cdlt

lego35

 

Vote positif 0 Vote négatif

L

lego35

XLDnaute Junior

• 11 Septembre 2015

• #9

Re : Recherchev doublons

Bonjour Dranreb, bonjour le forum

j'ai effectué un test sur ton fichier. tu trouveras le nouveau.

Cdlt
Merci

Lego35

 

Pièces jointes

• ESSAI 1.xls

  103.5 KB · Affichages: 53
• ESSAI 1.xls

  103.5 KB · Affichages: 75

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 11 Septembre 2015

• #10

Re : Recherchev doublons

Bonjour.

Si vous ne souhaitez pas apprendre à adapter vous même le classeur que je vous avais fourni, peut être trouverez vous quelqu'un d'autre que cela intéressera grandement ?
Ça revient en gros à prévoir une colonne de plus (donc 5 au lieu de 4) dans le tableau VBA Ts de la première partie pour y mettre le type, qui fera l'objet d'un niveau de regroupement supplémentaire dans la seconde et donc d'une variable Typ As SsGroup, avec un nombre de colonne dans Ts passant à 26 au lieu de 14.
Au lieu de Mois.Id + 2 il faudra bien sur prendre Mois.Id * 2 + Typ.Id - 8 pour que mois 1, typ 9 ça aille en colonne 3: 1 * 2 + 9 - 8 = 3

 

Dernière édition: 11 Septembre 2015

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 11 Septembre 2015

• #11

Re : Recherchev doublons

C'est fait de mon coté. Je joindrai bientôt ce corrigé.
J'ai choisi de ranger dans cet ordre les infos dans la 1ère partie :

VB:

            Ts(Ls, 1) = Te(Le, 1) ' Nom
            Ts(Ls, 2) = Te(Le, 2) ' Prénom
            Ts(Ls, 3) = M         ' Mois
            Ts(Ls, 4) = Te(Le, 3) ' Type
            Ts(Ls, 5) = Te(Le, 6) ' Nbr. Jrs

Ce qui permet donc de construire la collection par:

VB:

Set Données = GroupOrg(Ts, 1, 2, 3, 4)

 

Vote positif 0 Vote négatif

F

filiph79

XLDnaute Occasionnel

• 11 Septembre 2015

• #12

Re : Recherchev doublons

bonjour,

une evolution avec somme.si "recopiable" sur tout le tableau de synthèse en utilisant indirect pour faire varier les feuilles.
je t'ai donc modifier les intitulés de colonnes pour qu'ils oient identiques aux noms de feuilles.
j'ai aussi concaténer le nom et le prénom pour éviter 2 noms identiques.

j'ai remarqué aussi qu'il y avait quelques noms suivi d'un espace.....


fichier joint

 

Pièces jointes

• ESSAI.xls

  111.5 KB · Affichages: 64
• ESSAI.xls

  111.5 KB · Affichages: 56

Vote positif 0 Vote négatif

L

lego35

XLDnaute Junior

• 11 Septembre 2015

• #13

Re : Recherchev doublons

Bonsoir Dranred,

Super sympa. j'avais peur de le faire moi même.. le problème c'est que je connais rien en VBA.

j'attendrai.

Merci encore pour ton "aide" voire plus...

Cdlt
Lego35

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 11 Septembre 2015

• #14

Re : Recherchev doublons

je connais rien en VBA.

Cliquez pour agrandir...

Oui mais ce n'est que provisoire, j'espère ? J'ai déjà bien assez à faire avec l'évolution des modules de service que je propose, je ne vais tout de même pas assumer la maintenance te toute la programmation applicative de tout le monde. Essayez quand même de comprendre comment fonctionne la procédure Worksheet_Activate de la feuille résultante, ce serait normal que vous en soyez au courant, non ? Vous pouvez toujours me poser des question sur ce que vous ne comprenez pas.

 

Vote positif 0 Vote négatif

L

lego35

XLDnaute Junior

• 12 Septembre 2015

• #15

Re : Recherchev doublons

Bonjour Dranreb, bonjour le Forum

Bon je vais essayer.
1ere question: Dois-je d'abord modifier le tableau de l'onglet SYNTHESE ? (il prendra en compte une nouvelle colonne (type "9"et type "10") pour un même mois et ce pour tous les mois)

Cdlt

Lego35

 

Vote positif 0 Vote négatif