IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

code VBA pour rechercher un dossier


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Futur Membre du Club
    Homme Profil pro
    Ingenieur
    Inscrit en
    Octobre 2023
    Messages
    6
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Maroc

    Informations professionnelles :
    Activité : Ingenieur

    Informations forums :
    Inscription : Octobre 2023
    Messages : 6
    Par défaut code VBA pour rechercher un dossier
    *Bonjour,*

    Nom : Capture d’écran 2023-10-24 065730.png
Affichages : 266
Taille : 36,6 Ko
    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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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.

  2. #2
    Modérateur

    Homme Profil pro
    Inscrit en
    Octobre 2005
    Messages
    15 410
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Octobre 2005
    Messages : 15 410
    Par défaut
    Bonjour.

    Quelle est la requête qui alimente ton formulaire ?

    A+
    Vous voulez une réponse rapide et efficace à vos questions téchniques ?
    Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
    Et aussi regardez dans la FAQ Access et les Tutoriaux Access. C'est plein de bonnes choses.

  3. #3
    Futur Membre du Club
    Homme Profil pro
    Ingenieur
    Inscrit en
    Octobre 2023
    Messages
    6
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Maroc

    Informations professionnelles :
    Activité : Ingenieur

    Informations forums :
    Inscription : Octobre 2023
    Messages : 6
    Par défaut code VBA pour rechercher un dossier
    bonsoir,

    merci pour votre soutien.

    premierement, mon formulaire est un formulaire (partie superieure issue de la TABLE DOSSIER) avec sous formulaire (TABLE Avancement)Nom : Formulaire.png
Affichages : 218
Taille : 29,7 Ko.
    Aussi, ma BD comprend deux autres formulaires:
    1- recherche petitionnaire qui se base sur la requete suivante:Nom : requete 1.png
Affichages : 223
Taille : 12,4 Ko.
    2- affichage de l'avancement des dossiers en se basant sur la requete ci après Nom : Requete avancement.png
Affichages : 218
Taille : 14,7 Ko.

    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

  4. #4
    Modérateur

    Homme Profil pro
    Inscrit en
    Octobre 2005
    Messages
    15 410
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Octobre 2005
    Messages : 15 410
    Par défaut
    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+
    Vous voulez une réponse rapide et efficace à vos questions téchniques ?
    Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
    Et aussi regardez dans la FAQ Access et les Tutoriaux Access. C'est plein de bonnes choses.

  5. #5
    Futur Membre du Club
    Homme Profil pro
    Ingenieur
    Inscrit en
    Octobre 2023
    Messages
    6
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Maroc

    Informations professionnelles :
    Activité : Ingenieur

    Informations forums :
    Inscription : Octobre 2023
    Messages : 6
    Par défaut
    le probleme persiste tjrs

  6. #6
    Modérateur

    Homme Profil pro
    Inscrit en
    Octobre 2005
    Messages
    15 410
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Octobre 2005
    Messages : 15 410
    Par défaut
    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+
    Vous voulez une réponse rapide et efficace à vos questions téchniques ?
    Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
    Et aussi regardez dans la FAQ Access et les Tutoriaux Access. C'est plein de bonnes choses.

Discussions similaires

  1. Réponses: 0
    Dernier message: 20/10/2019, 11h06
  2. Réponses: 6
    Dernier message: 06/07/2016, 16h09
  3. Réponses: 2
    Dernier message: 12/11/2015, 20h42
  4. [AC-97] Code VBA pour ecrire Rdv Dossier Public
    Par laurent.mario dans le forum VBA Access
    Réponses: 0
    Dernier message: 28/04/2009, 08h15
  5. [XL-2003] Code VBA pour fusion des Dossiers
    Par em_bengue dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 07/04/2009, 00h03

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo