code vba sous access

On va faire un peu plus simple.
Oublie Excel.

Tu fias une requête qui tient compte de la lettre K et qui contient le num de police.

Code:

---

1 2 3

SELECT Table3.Police, Table3.Type FROM Table3 WHERE (((Table3.Type)="K"));

---

Cette requête, je l'appelle QRY1

Ensuite une seconde requête qui contient de nouveau la table et le requête QRY1. avec comme jointure les numéros de police.

En gros, on va sélectionner toutes les polices qui ont au moins une fois K dans le champ.

Code:

---

1 2	SELECT Table3.Police, Table3.Type, Table3.Eff, Table3.Ech FROM Qry1 LEFT JOIN Table3 ON Qry1.Police=Table3.Police;

---

Avec l'exemple donnée, voilà ce que ça donne :

Code:

---

1 2 3 4

Police Type Eff Ech 200113 s 01/02/2007 02/02/2007 200113 r 11/02/2007 03/07/2007 200113 k 12/04/2007 02/05/2007

---

Voilà ce que ça donne

oui c'est à peu près ça .......mais je veux pas qu'il me sélectionne les enregistrements qui ont la valeur de date d'effet ou echéance différentes de celle de l'enregistrement avec police identique et valeur "k"
en attachement le résultat voulu

Il suffisait d'ajouter les dates.

Mais dans la table, les dates n'étaient pas bonnes.

merci bien heureux-oli
j'ai une autre question mais c'est très difficile à expliquer!!!:? :oops:
à la prochaine:D
amicalement

Peut-être que la réponse sera facile à donner !

rebonjour
voilà ja requête sélection marche très bien...
comment supprimer la sélection.....j'ai essayé DELETE matabl.* au lieu de SELECT .... mais ça marche pas
merci

Je viens de faire quelques tests et j'ai trouvé comment faire, il faut une requête en plus et modifier la second requête ainsi que la table.

Dansla table, il faut ajouter un champ Oui/Non

Valeur par défaut non.

On va mettre ce champ à jour pour supprimer ceux qui doivent l'être.

Code:

---

UPDATE Qry_K LEFT JOIN Table3 ON (Qry_K.Ech = Table3.Ech) AND (Qry_K.Eff = Table3.Eff) AND (Qry_K.Police = Table3.Police) SET Table3.bool = Yes;

---

Ensuite on les supprime

Code:

---

1 2 3

DELETE Table3.ID, Table3.Police, Table3.Type, Table3.Eff, Table3.Ech, Table3.bool FROM Table3 WHERE (((Table3.bool)=Yes));

---

J'avais oublié le fichier

merci bie ça marche très bien.....
j'aimerais avoir une autre sélection suppression...je veux supprimer tous les enregistrements qui ont mêmes eff et police identiques aux enregistrement avec categorie "3"
exemple :
Numéro police effe categorie
1 123 01/01/2002 s
2 123 01/01/2002 3
3 145 02/03/2005 h
4 123 01/01/2002 g
je veux que la requête me supprime les lignes 1 et 4
c'est faisables....

Il suffit de recommencer la même manoeuvre.

mais je veux pas supprimer les enregistrements à catégorie="3"....juste ceux qui ont les même polices et les dates effets que ceux à catégorie="3":oops:

Tu fais pareil, mais tu mets une clause de critère dans la suppression.

Code:

---

1 2	Not Like "3"

---

merci bien :bravo: :merci: