Usage des ListBox Multicolonnes

Bonjour,

Sous Access, j'ai créé un formulaire contenant une liste box avec 2 colonnes. Ce paramètre "nombre de colonne" est directement indiqué dans les propriétés de la listBox en question.
Je souhaiterais simplement indiquer le prénom dans la première colonne et le nom dans la seconde.

J'ai cherché, mais je ne trouve que des exemples souvent liés à des tableaux "Excel" et faisant apparaître une propriété "List" de la ListBox : propriété qui n'existe PAS sous Access - VBA.

Quelqu'un peut-il m'aider SVP ?

Merci.

Bonjour

Alimente ta lisbox par une requête et change l'ordre des champs dans celle-ci.

Merci pour cette information.
Pourrais-tu me donner un exemple simple de code qui me permettrait de comprendre la syntaxe à adopter STP ?
Merci.

bonsoir,
il faut préciser la source des données dans la propriété Contenu de ta liste. Tu peux mettre le nom de la table (dans ce cas la propriété Origine source sera: Table/Requête) ou, dans ton cas la requête suivante:

Code:

---

select [prénom], [nom] from matable;

---

qui te permet de mettre les champs dans l'ordre désiré.

Bonjour à tous et merci pour votre aide.
Mais, je crois que je m'explique mal...

En fait, je récupère un prénom et un nom via une requête SQL au sein d'une procédure.

Ensuite, dans ma liste box qui contient 2 colonnes, je souhaiterais l'alimenter de telle manière qu’apparaisse dans la colonne de gauche, le prénom et celle de droite le Nom.
Le paramètre "Origine source" est : Liste valeurs

En fait existe t-il une (ou des) commande(s) qui me permettrait d'arriver à une finalité du style :

Code:

---

1 2	MaListeBox.Additem (colonne, ligne) = sPrenom MaListeBox.Additem (colonne + 1 , ligne) = sNom

---

Faut-il obligatoirement passer par une "Origine Source" = Table/requête ?
Mais même dans ce cas, comment préciser la colonne où apparaitra le prénom et celle où apparaitra le nom !?

Bon j'espère ne pas être trop brouillon dans ma demande. ! :-)

Merci à vous et bonne journée.

bonjour Enoxandre,
c'est encore plus simple avec une liste de valeurs:

Code:

---

1 2 3 4 5 6 7 8

Dim varItm As Variant Dim ItIndx As Integer   If Not IsNull(sPrenom) And Not IsNull(sNom) Then ItIndx = Me.MaListeBox.ListCount ' le nombre d'enregistrements constitue l'index du prochain ajout puisque l'index est en base 0 varItm = sPrenom & ";" & sNom Me.MaListeBox.AddItem varItm, Index:=ItIndx ' ajoute dans la liste les nouvelles valeurs End If

---