Concatener une zone de liste

Résolu
Bonjour à tous.
Svp je viens auprès de vous pour solliciter une aide.
Ça fait des heures que j'essaie en vain de concaténer les données d'une zone de liste.
Voici en annexe ma base de données:

https://www.cjoint.com/c/LBolWs5yuMO

veuillez ouvrir le formulaire "Ajoutercommande"
A gauche il y a une liste des produit
Cliquez sur le produit, saisissez la quantité puis cliquez sur "ajouter produit" (faites la même chose pour les trois produits )

Voici maintenant ma préoccupation:
J'aimerais qu'à chaque fois je clique sur le bouton "valider facture" à son événement "sur souris appuyée", que la zone de texte nommée " txt_prod_qte" affiche chaque produit et sa quantité
Quelqu'un peut-il m'aider svp??

1 réponse

  1. Contributeur
    bonjour,

    une façon de faire, c'est, au moment de traiter "ajouter produit", d'adapter le texte qui sera ensuite affiché dans la zone de texte nommée " txt_prod_qte".

    une autre façon de faire, ce serait d'extraire les infos de la table "commandes" pour construire le texte souhaité.
    1. Merci. J'essaie alors
    2. Bonjour
      Voici le code qui me permet de concaténer ma zone de liste
      Mais le problème en est que ce code concatène uniquement les données de la première colonne.
      Alors que moi je veux concaténer les éléments de la deuxième et la quatrième colonne (produit et quantité séparé par une virgule ex. " souri4, clavier 3, caméra2, etc"

      Comment corriger ce code svp

      Private Sub ShowItems()
      Dim sList As String
      Dim nIndex As Integer

      For nIndex = 0 To ListBox1.ListCount - 1
      sList = sList & ListBox1.ItemData(nIndex) & ","
      Next
      sList = Left$(sList, Len(sList) - 1)

      MsgBox sList
      End Sub
    3. Contributeur
      @Ericpeux-tu partager ton fichier avec le code inclus?
    4. @yg_beBonjour
      Voici mon mon fichier ouvrez le formulaire "ajoutecommande"
      Ajouter les produit et les quantité, puis cliquez sur "OK " il vous affichera juste la 1ere colonne. Alors que moi je veux qu'il m'affiche la deuxième et la quatrième colonne (destination et quantité)

      Cordialement

      https://www.cjoint.com/c/LBvketq3mGP
    5. Contributeur
      @Eric
      ListBox1.ItemData(nIndex)
      te donne la valeur de la colonne liée.

      pour avoir les valeurs des colonnes 2 et 4, fais plutôt ainsi:
      txtlisteproduitdemandes.Column(1, NumIndex)

      txtlisteproduitdemandes.Column(3, NumIndex)