Supprimer une ligne dans un Etat avec du VBA

Résolu
zonteomer74 Messages postés 29 Date d'inscription   Statut Membre Dernière intervention   -  
Zonteo Messages postés 104 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Est ce possible de supprimer une ligne dans un état access dont la zone de Texte répond à un critère donné ? Si Oui comment dois je m'y prendre ?
Exemple si la valeur d'une zone de texte est -1 toute la ligne doit être supprimée.
Merci pour votre aide.


A voir également:

1 réponse

yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonjour, moi j'essaierais en rajoutant un critère dans la requête qui sert de base à l'état.
0
zonteomer74 Messages postés 29 Date d'inscription   Statut Membre Dernière intervention   2
 
Ok alors quell est le code VBA ou la formule qu'il faut utiliser?
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > zonteomer74 Messages postés 29 Date d'inscription   Statut Membre Dernière intervention  
 
eb bien, supposons que tu aies un état qui soit basé sur une requête R_EVA1 dont le code SQL est
SELECT T_EVA.[N° CAND], T_EVA.[NOM ET PRÉNOMS ELEVE], T_EVA.GENRE, T_EVA.ECOLE, T_EVA.CLASSE, T_EVA.SECTEUR, T_EVA.NOM_DU_MAITRE, T_EVA.[NOM DU DIRECTEUR], T_EVA.[ANNEE SCOLAIRE], T_EVA.ETT1, T_EVA.AEM1, T_EVA.DICTEE1, T_EVA.MATH1, T_EVA.DECISION1, T_EVA.INSCRITS_G1, T_EVA.INSCRITS_F1, T_EVA.INSCRITS_T1, T_EVA.ABSENTS1, T_EVA.TOT1, T_EVA.MOY1, T_EVA.Localite, DCount("*","[R_EVA1]","[MOY1]>" & [MOY1])+1 AS Rang, T_EVA.ABST1, T_EVA.IEPP, T_EVA.TEL, T_EVA.Email, T_EVA.BP, T_EVA.[NOM DE L'IEPP], T_EVA.[DATE EVA 1], T_EVA.REGION, T_EVA.DREN, T_EVA.DDEN
FROM T_EVA;

supposons que tu décides de supprimer ceux qui ont "Refusé" dans DECISION1.
tu pourrais alors modifier le code SQL de la requête, en y ajoutant (avant le ;):
WHERE DECISION1 <> "Refusé"
0
zonteomer74 Messages postés 29 Date d'inscription   Statut Membre Dernière intervention   2
 
Merci beaucoup pour tout ce que tu fais pour moi et pour toute la communauté de commentcamarche.
Je ne m'y connais pas trop en SQL mais ton effort va me donner le courage de l'étudier tout comme les relations entre les Tables access qui me fatiguent bien.
Merci une fois de plus.
0
Zonteo Messages postés 104 Date d'inscription   Statut Membre Dernière intervention   1
 
Salut,
Vraiment génial. A partir de votre code SQL j'ai pu comprendre le fonctionnement de la condition WHERE.
Alors j'ai réussi à ne pas afficher la ou les lignes dont je n'ai pas besoin dans mon état.
Au fait ma base a évolué et il y a un nouveau champ [NON INSCRIT].et tous les enregistrements dont le champ [NON INSCRIT]<>True s'affichent.
J'ai inséré [NON INSCRIT]<>True dans la condition WHERE du bouton de commande qui permet d'ouvrir mon Etat.
Alors tous les enregistrements s'affichent sauf ceux dont le champ [NON INSCRIT]=True.
Et ça marche. Maintenant il ne reste qu'à ajouter [NON INSCRIT]<>True dans le code SQL de la requête R_EVA1 pour que ça marche.
J'ai essayé mais je n'avais bien lu votre explication. Je viens de me rendre compte que je dois mettre [NON INSCRIT]<>True juste après FROM T_EVA;
Ce qui donne à la fin du code SQL ceci:
FROM T_EVA [NON INSCRIT]<>True;
Merci beaucoup.
Tu m'as permis de comprendre un peu le code SQL dont j'avais peur mais aussi de comprendre le fonctionnement de la condition WHERE dans une macro dans un bouton de commande.
Je suis en déplacement dans une autre ville pour les soins de ma fille. Dès que je rentre je modifie le SQL puis je vous fait informe de la suite.
Merci infiniment.
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > Zonteo Messages postés 104 Date d'inscription   Statut Membre Dernière intervention  
 
ou un peu différent:
...  FROM T_EVA WHERE NOT [NON INSCRIT] ; 
0