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 :

Remplissage d'un combobox special


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Mai 2007
    Messages
    40
    Détails du profil
    Informations personnelles :
    Âge : 42
    Localisation : Suisse

    Informations forums :
    Inscription : Mai 2007
    Messages : 40
    Par défaut Remplissage d'un combobox special
    Rebonjour a tous

    j'ai un souci de remplissage avec mon combobox.
    je veux le remplir avec une requete.
    cela fonctionne, a un seul (gros )détail, c'est que le combobox se remplit en collone (après avoir bidouillé les propriété pour mettre 5 colonne, et n'en afficher que 4):


    je le remplis comme ça :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
          'filtre pour remplissage du combo
          strSqlCombo = "SELECT * FROM Q_CboF_EbNoHistory where ID_Circuit ='" & m_strIndexCircuit & "'"
     
          'remplissage du combo avec le filtre
          CboEbNoHistory.RowSource = strSqlCombo
    et voici ma requette :


    en en mode création:


    Je sais que l'idéal serait que ma requette me sorte une ligne de chaque circuit avec une Situation_Sense, mais alors ça signifierai faire 4 requetes?

    n'y a t'il pas plus simples?
    j'ai essayé avec un boucle, mais ça le fait pas

    comme d'habitude,un grand merci d'avances

  2. #2
    Membre Expert
    Avatar de mout1234
    Profil pro
    Inscrit en
    Novembre 2006
    Messages
    2 210
    Détails du profil
    Informations personnelles :
    Âge : 56
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Novembre 2006
    Messages : 2 210
    Par défaut
    Heu, je suis sans doute un peu fatigué ... j'ai pas compris quel est ton problème

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Mai 2007
    Messages
    40
    Détails du profil
    Informations personnelles :
    Âge : 42
    Localisation : Suisse

    Informations forums :
    Inscription : Mai 2007
    Messages : 40
    Par défaut
    peut etre aussi que jeme suis mal exprimé

    en gros, mon combobox se remplit en colonne...
    moi j'aimerais qu'il se remplisse en ligne !!!

    mieux la?

  4. #4
    Membre Expert
    Avatar de mout1234
    Profil pro
    Inscrit en
    Novembre 2006
    Messages
    2 210
    Détails du profil
    Informations personnelles :
    Âge : 56
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Novembre 2006
    Messages : 2 210
    Par défaut
    Citation Envoyé par porci82
    peut etre aussi que jeme suis mal exprimé

    en gros, mon combobox se remplit en colonne...
    moi j'aimerais qu'il se remplisse en ligne !!!

    mieux la?
    Bof... je comprends pas bien ce que tu cherches à faire.

    Une combobox présente une à plusieurs colonnes représentant chacune un champ ou le résultat d'une expression. Chaque ligne représente un enregistrement de la source.
    La valeur de la combo (lorsque l'utilisateur sélectionne) correspond à la valeur dans une des colonnes (par défaut la première) pour l'enregistrement sélectionné.

    Au vu de tes copies d'écran, ....


    Ca y est, je viens de comprendre ton problème (enfin je crois ). EN fait c'est ta structure de données qui n'est pas trés clean ... et tu voudrais voir dans la liste, pour un circuit donné, les valeurs issues de plusieurs champs différents....

    Dans ce cas, tu peux sans doute t'en sortir avec une requete union.
    QQ chose du genre:

    Code VBA : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    CboEbNoHistory.RowSource="SELECT TableCarrier_1.situationSense as Situation FROM Q_CboF_EbNoHistory where ID_Circuit ='" & m_strIndexCircuit & "'" & _
    " UNION ALL " & _
    " SELECT TableCarrier_2.situationSense as Situation FROM Q_CboF_EbNoHistory where ID_Circuit ='" & m_strIndexCircuit & "'" & _
    " UNION ALL " & _
    " SELECT TableCarrier_3.situationSense as Situation FROM Q_CboF_EbNoHistory where ID_Circuit ='" & m_strIndexCircuit & "'"

    Il serait d'ailleurs peut être préférable de revoir ta requête Q_CboF_EbNoHistory dans ce sens.

  5. #5
    Membre averti
    Profil pro
    Inscrit en
    Mai 2007
    Messages
    40
    Détails du profil
    Informations personnelles :
    Âge : 42
    Localisation : Suisse

    Informations forums :
    Inscription : Mai 2007
    Messages : 40
    Par défaut
    exact, c'est ça.
    en fait, ça s'affiche sur mon combo en colonne, et moi je veux un affichage en ligne, pour pouvoir après cliquer dessus, et selectionner les valeurs en fonction de ça!

    je vais essayer de comprendre et d'adapter ton code de requete.
    merci!

  6. #6
    Membre averti
    Profil pro
    Inscrit en
    Mai 2007
    Messages
    40
    Détails du profil
    Informations personnelles :
    Âge : 42
    Localisation : Suisse

    Informations forums :
    Inscription : Mai 2007
    Messages : 40
    Par défaut
    ça marche!!!!!!

    t'est un chef

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

Discussions similaires

  1. Probleme de remplissage d'un combobox excel 2007
    Par da991319 dans le forum Macros et VBA Excel
    Réponses: 7
    Dernier message: 07/02/2008, 23h42
  2. Remplissage d'une comboBox
    Par BountyHunter dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 26/12/2007, 11h05
  3. Remplissage d'une combobox
    Par Tiresia dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 19/07/2007, 10h13
  4. Réponses: 2
    Dernier message: 29/09/2006, 16h40
  5. Réponses: 3
    Dernier message: 14/06/2006, 16h36

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