Discussion :

[bird007]

Bonjour,

Est ce quelqu'un peut me désigner un tuto pouvant m'expliquer comment créer une listbox sur access.

Merci

[Soycd]

Bonjour,

Que veux-tu exactement ? La créer seulement ? Savoir comment la remplir ? Le faire avec l'IHM ? En VBA ?

Le moyen le plus simple pour créer une listbox est de créer un formulaire en mode création et d'insérer une 'zone de liste' ou une 'zone de liste déroulante' dans ta Form.

[bird007]

Bonjour,

Au fait je veux la créer et l'alimenter depuis une tables access.

Merci

[Soycd]

Dis moi si ceci te convient, c'est un bout de code légèrement modifié d'un de mes scripts, si tu ne comprends pas quelque chose, fais nous signe :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
    Dim Path As String
    Path = CurrentProject.Path & "\" & CurrentProject.Name
 
    Dim requete As String
 
    'Instanciation de la connexion à la base access
    Dim cn As New ADODB.Connection
    cn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Path & ";"
    cn.Open
 
    'Instanciation du RS de recherche dans la base
    Dim rst As New ADODB.Recordset
    rst.ActiveConnection = cn
 
    requete = "Select monChamp from maTable"
    rst.Open requete
 
    While (rst.EOF = False)
         maListeBox.AddItem (rst.Fields.Item(0).Value)
         rst.MoveNext
    Wend
 
    [...]
 
    cn.Close
 
    Set cn = Nothing
    Set rst = Nothing