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 :

selectionner dans plusieurs champs


Sujet :

VBA Access

  1. #1
    Membre à l'essai
    Femme Profil pro
    Étudiant
    Inscrit en
    Mars 2012
    Messages
    10
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : Mars 2012
    Messages : 10
    Points : 10
    Points
    10
    Par défaut selectionner dans plusieurs champs
    Bonjour,

    J'ai un combobox qui liste les fournisseurs réunis dans 3 champs différents (impossible à changer). L'utilisateur choisit un fournisseur et j'ai dans une zone de liste les lignes contenant le fournisseur choisit qui s'affiche.

    Le problème c'est que ma programmation ne va regarder que dans le champ fournisseur1. C'est-à-dire que si l'utilisateur a choisi un fournisseur présent pour une ligne dans le champ fournisseur2 ou fournisseur3 et bien les lignes satisfaisant pourtant ce choix n'apparaissent pas dans le résultat.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
     
    Dim SQL As String
    SQL = "SELECT numéro, Produit, Description, [Folder],Fournisseur1 ,Prix1,Fournisseur2, Prix2, Fournisseur3, Prix3  FROM Equipement Where Equipement![Appel d'offre] <> 0 "
     
    If Me.chkfournisseur Then
     
      SQL = SQL & "And Equipement!Fournisseur1  = '" & Me.cmbfournisseur & "' "
     
     End If
     
     Me.lstresultat.RowSource = SQL
     Me.lstresultat.Requery
    (vous avez sûrement reconnu un code similaire au tuto de caféine pour ceux qui connaissent

    Donc voilà ma partie de code à modifier, je suis sûre que c'est très simple mais je n'arrive pas à trouver la formulation correcte, j'ai par exemple essayé:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
    SQLDES = "And Equipement!Fournisseur1 Or Equipement!Fournisseur2 Or Equipement!Fournisseur3 = '" & Me.cmbfournisseur & "' "
     
     
        SQL = SQL & SQLDES
    enfin le truc de barbare mais voilà ça marche pas!

    Une idée?

  2. #2
    Membre expert
    Avatar de FreeAccess
    Homme Profil pro
    Un monde ou prendre est plus facile qu'apprendre.
    Inscrit en
    Mars 2006
    Messages
    2 745
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Un monde ou prendre est plus facile qu'apprendre.

    Informations forums :
    Inscription : Mars 2006
    Messages : 2 745
    Points : 3 834
    Points
    3 834
    Par défaut
    Bonjour,

    Pas très clair .....
    ...combobox qui liste les fournisseurs réunis dans 3 champs différents....et j'ai dans une zone de liste les lignes contenant le fournisseur choisit qui s'affiche.
    Pour résumer, tu veux dire..:

    - ton utilisateur choisi une ligne de ta ZdL contenant 3 colonnes affichant 3 fournisseurs différents .... (par exemple : A | B | C )

    - et tu souhaites que dans une Zone de liste, TOUS les fournisseurs correspondant à ce choix soit affichés
    ( Afficher tous les fournisseurs dont l'ID correspond aux colonnes 0, 1 et 2 de ma ZdL ....

    Es-tu sur de ne pouvoir "regrouper" tes fournisseurs en une seule colonne
    FreeAccess
    "Petit à petit l'araignée tisse sa toile"

  3. #3
    Membre à l'essai
    Femme Profil pro
    Étudiant
    Inscrit en
    Mars 2012
    Messages
    10
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : Mars 2012
    Messages : 10
    Points : 10
    Points
    10
    Par défaut
    finalement après un café c'est apparu beaucoup plus clair c'était tout simple



    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
    SQLL = " Equipement!Fournisseur1  = '" & Me.cmbfournisseur & "' Or Equipement!Fournisseur2  = '" & Me.cmbfournisseur & "'Or Equipement!Fournisseur3  = '" & Me.cmbfournisseur & "'"
        SQL = SQL & "And " & SQLL

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 9
    Dernier message: 28/08/2007, 10h38
  2. Réponses: 1
    Dernier message: 13/03/2007, 09h52
  3. Réponses: 3
    Dernier message: 21/01/2007, 10h40
  4. Réponses: 7
    Dernier message: 26/10/2006, 15h13
  5. [SQL Server] rechercher dans plusieurs champs d'une table
    Par houla! dans le forum Langage SQL
    Réponses: 3
    Dernier message: 23/08/2006, 09h37

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