code VBA pour rechercher un dossier

*Bonjour,*

Pièce jointe 645622
j'ai cree une base de donnees dont les relations entre tables se presentent comme expliquees dans l'image.
j'ai ecrit un code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Option Compare Database 'BOUTON CHERCHER Private Sub Chercher_Click() Dim ID_DOSSIER As Integer ID_DOSSIER = InputBox("Veuillez saisir ID_Dossier", "Recherche par ID_Dossier") If (IsNull(DLookup("ID_Dossier", "Dossiers", "cint(ID_Dossier)= '" & ID_DOSSIER & "'"))) Then MsgBox "le N Dossier ne figure pas", vbCritical, "Erreur" Else Me.Recordset.FindFirst "ID_Dossier = " & ID_DOSSIER End If End Sub

---

pour rechercher u dossier a partir de son ID , mais je ne trouve que les dossiers pour lesquels tous les enregistrements ont et saisis. les autres dossiers, meme s'ils sont presents dans la tables Dossiers ils sont plus trouves.

merci de m'aider sur ce probleme.

Bonjour.

Quelle est la requête qui alimente ton formulaire ?

A+

bonsoir,

merci pour votre soutien.

premierement, mon formulaire est un formulaire (partie superieure issue de la TABLE DOSSIER) avec sous formulaire (TABLE Avancement)Pièce jointe 645749.
Aussi, ma BD comprend deux autres formulaires:
1- recherche petitionnaire qui se base sur la requete suivante:Pièce jointe 645750.
2- affichage de l'avancement des dossiers en se basant sur la requete ci après Pièce jointe 645751.

aussi, il faut noter que lorsque la table avancement etait vide, le code VBA que j'ai edite marche a merveille. Une fois les champs de la table avancement sont saisies, le code ne m'affiche que les dossiers dont les enregistrements dans la table avanceemnt sont disponibles.

merci

Bizarre.

Fait un essai. Copie ton formulaire sous un autre nom et enlève le sous-formulaire Avancement.
Est-ce que le problème continu ?
A+

le probleme persiste tjrs

Bonjour.

Ça doit venir de la source de données de ton formulaire principale.

Il faudrait que tu postes une copie d'écran complète en mode conception, pas seulement les champs, pour qu'on puisse voir les tables et les jointures que tu as faites.
Tu as probablement une jointure stricte entre Dossier et Avancement mais tant qu'on ne voit pas on ne sait pas :-).

A+

Pièce jointe 645933
Pièce jointe 645935
Pièce jointe 645936
Pièce jointe 645934
bonsoir, ci joint tous les formulaire et les requetes dans ma base de donnees.

a+

Désolé on ne voit toujours pas la partie vraiment utile.
C'est quelque chose qui ressemble à la partie haute de cela :
Pièce jointe 646004
Là où on voit les jointures entre les tables.
A+

Pièce jointe 646046Pièce jointe 646046

Ok, c'est ce que je pensais.

Tu as fait des jointures strictes entre Dossier et Avancement donc Access n'affiche que les dossiers qui ont au moins un avancement.
Il faut changer cela pour une jointure à gauche (ou à droite). Comme cela Access va afficher les dossiers et éventuellement les informations sur les avancements.
Pour faire cela il faut que tu sélectionnes le trait de la jointure puis tu cliques droit.
Access va t'afficher un choix du genre :

1. Tous les enregistrements présents dans la table A et la table B.
2. Tous les enregistrements dans la table A et ceux dans la table B
3. Tous les enregistrements dans la table B et ceux dans la table A

Habituellement c'est le choix numéro 2. Fait un essai et si cela ne marche pas prend le 3.
Tu devrais voir toutes les données qui t'intéressent ensuite.

Attention, il est possible que tu te retrouves avec plusieurs fois la même ligne pour tes dossiers (autant de fois que tu as d'avancement) et si c'est le cas il faudra revoir ta requête mais on en parlera si cela se produit.

A+

je vous remercie pour votre soutien,

mais on essayons tous les choix le probleme persiste toujours.

est ce que je dois refaire la BD?