Discussion :

[Invité]

Bonjour tout le monde,

Je suis confronté à un problème :

Je sais écrire une liste déroulante qui prend une plage de cellulles et les affiche.
Je sais faire une requête sous EXCEL par rapport à une base ACCESS.

Ce que je ne sais pas : mettrel le résultat de ma requête (quelques lignes) dans ma liste déroulante.

Je précise que dans la mesure du possible, je ne souhaite pas écrire le résultat de ma requête dans une feuille et afficher ces lignes dans ma liste. J'aimerais que tout se fasse en une étape, et pas deux.

Je vous remercie d'avance

[Oliv-]

Bonjour
Voici un exemple issu du site de Jacques BOISGONTIER

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Formulaire alimenté par une base Access
 
Private Sub UserForm_Initialize()
  'Microsoft Data Object 2.8 doit être coché
  repertoire = ThisWorkbook.Path & "\"
  Set cnn = New ADODB.Connection
  cnn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & repertoire & "Access2000.mdb"
  Set rs = cnn.Execute("SELECT nom_client FROM client Order By nom_client")
  Me.ComboBox1.List = Application.Transpose(rs.GetRows)
  rs.Close
  cnn.Close
  Set rs = Nothing
  Set cnn = Nothing
End Sub

autre méthode parcourir le recordset et ajouter 1 par 1 les enregistrements

[Invité]

Merci pour ta réponse Oliv.

Avant de poser la question sur le forum, j'avais fait des recherches sur le sujet.
Et j''étais notamment tomber sur les userforms, mais je n'arrive pas à comprendre réellement ce que c'est. Ni à les faire fonctionner.

C'est une nouvelle fenêtre qui s'ouvre ?

[Oliv-]

Je pensais que tu voulais cela dans une userform;

en fait une userform c'est comme une MSGBOX ou une INPUTBOX sauf que tu y mets ce que tu veux;

voir ici puis là

[Invité]

D'acccord, c'est bien ce que je pensais

Voilà dans la mesure du possible, je préférais que la liste reste/soit dans ma feuille EXCEL.
Et pour ça j'ai trouvé aucune info sur internet...

[Oliv-]

Je n'utilises pas cette méthode,
mais en y regardant rapidement il semble qu'il faille que tes données soient sur une feuille (elle peut être cachée) mais il faut nommer la zone pour la réutiliser dans une feuille différente.

[Invité]

J'ai vu qu'en utilisant un userform, il existait une méthode "add" qui permettait d'ajouter des items dans la liste.
Y-a t-il un équivalent pour ce que je voudrais faire ?

Merci d'avance