Discussion :

[jfcollombet]

Bonjour j'ai une table Access dans laquelle je souhaite supprimer des doublons du champ NUM_TUER mais selon plusieurs critères venant du champ PORC


CRITERE N° 1 je garde systématiquement PORCS = PJ3


CRITERE N° 2 : si pas de PJ3 (PJ1 ou PJ2) je garde PJ2



merci de votre aide

[marot_r]

Bonjour.

J'essairai cela :

1. faire une requete (reqEstDouble) qui determine si ton enregistrement est en double (EstDouble: DCount("[NUM_TER]"; "TaTable"; "[NUM_TER]=" & [TaTable].[NUM_TER]) > 1).
2. Apres je ferai une requete (reqPJ3_PJ1) qui determine si ces doubles sont des PJ3 (EstPJ3: [ReqEstDouble].[PORC]="PJ3") ou des PJ1 sans PJ3 (EstPJ1: Dcount("[NUM_TER]"; "ReqEstDouble"; "[NUM_TER]=" & [ReqEstDouble].[NUM_TER] & " and [PORC]=""PJ3""")=0).
3. Enfin tu fais une requete de suppression basee sur reqPJ3_PJ1 qui supprime tous les enregistrements qui ont EstPJ3=False ou EstPJ1=false.

Je pense que cela va repondre a ton besoin.

Aussi on aurait sans doute pu tout faire en une seule requete mais passer par 3 me parait plus facile car on peut valider les resultats intermediaires.

A+

[jfcollombet]

Bonjour et merci pour ta réponse. Je teste ca demain matin et je te tient au courant si j'obtient le résultat escompté.

[jfcollombet]

Bonjour, lorsque je crée un module pour insérer le code de la requête, j'obtient une erreur de compilation, voici une capture :

[marot_r]

Bonjour.

Il n'y aucune function a creer.

Ce sont des champs calcules dans les requettes concernees. Desole de la confusion.

A+

[jfcollombet]

Merci de cet éclairage mais je ne vois pas très bien comment faire. Peux-tu m'envoyer une capture d'écran d'où insérer ces codes ?

[marot_r]

Bonjour.

Non helas je peux pas mais je vais detailler etape par etape.

1. Tu crees une nouvelle requete.
2. Tu selectionnes ta table.
3. Tu selectionnes * dans la liste des champs et tu la glisses dans les colonnes (* signifie : tous les champs)
4. Tu te mets dans une colonne vide a cote de l'etoile et tu crees le champs calcule :
   

   Code :

   Sélectionner tout - Visualiser dans une fenêtre à part

   EstDouble: DCount("[NUM_TER]"; "TaTable"; "[NUM_TER]=" & [TaTable].[NUM_TER]) > 1

   • EstDouble est le nom du champs calcule.
   • : signale a Access que le nom est termine.
   • Le reste est le calcul.
     Access va traduire DCount en francais.
     TaTable est a remplacer par le nom que tu as choisi pour ta table.

Tu repetes l'operation pour la seconde requete.

A+

[jfcollombet]

Merci pour cette aide. J'ai crée la requête EstDouble sans problème.
Voici une capture de la requête EstPj3_Pj1 et de requête de suppression. Le problème est que cette dernière ma demande de supprimer 1178 lignes, soit la totalité de la table! J'ai du faire quelque chose de travers.

[marot_r]

Bonjour.

J'ai peut-etre commis une erreur aussi dans mes formules.

Avant d'en faire une requete de suppression, fais-en une reqete de selection et regarde les resultats.
Valide les champs calcules. Est-ce que les resultats sont justes ? C-a-d que les enregistrements sont bien identifie comme des doubles, comme des PJ3, des PJ1.
Apres tu as juste a changer le type pour suppression.

A+