Discussion :

[dynexd]

bonjour à tous , me voila de retour sur ce forum pour faire chier tout le monde avec mes questions
enfin pour le moment j'en ai qu'une , elle n'a , je crois , pas encore été abordée ici.

Jai une page avec une liste ( pas deroulante), on selectionne une ligne de cette liste puis il y a un bouton modifier , qui amene sur un nouveau formulaire qui affiche en detail cette ligne et ou l'utilisateur peut modifier les champs qu'il veut de cette ligne
Pour les champs numeriques jai mis des cases de textes donc pas de soucis , mais certains champs correpondent a des tables ( categorie et clients) (jutilise donc des requetes toutes simples affichants ces tables a linterieur des listes deroulantes) jarrive a afficher des zone de liste deroulante ou apparraissent les clients et les categorie mais il faut que la liste deroulante preselectionne la categorie ou le client associé a la ligne

je ne peux donc pas utiliser ces caracteristiques ci :

Code :

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

1
2
3
 
ItemData(0) 
ItemData([Nom de la liste].ListCount-1)

il faudrait en fait que je puisse dire
ItemData(where id_categorie = idcat )
par exemple meme si c'est n'importe quoi

Merci au moins de m'avoir lu ^^

[dynexd]

Dans le genre methode a l'arrache(comme on les aime bien ^^) , en utilisant la methode requete modele qu'on modifie et qui crée une requete qui s'applique sur la liste deroulante, et ou on modifierai le "ORDER BY etc" ou on trierait de maniere a avoir en premier le resultat souhaite (et ensuite je n'aurait qu'a mettre un ItemData(0) , les categories ou clients seraient melangés mais ce serait deja un bon debut

enfin est ce possible de mettre quelque chose apres le ORDER BY qui place le résultat souhaité en premier ?

si ca peut aider a trouver lune solution ^^

[djefff75]

je ne comprend pas bien ta question mais il me semble que la méthode ci dessous peut t'aider.

Code :

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

1
2
3
 
NomFiltre = TXT.value
Me.Liste.RowSource = "SELECT ... FROM .... WHERE ChampFiltre =" & NomFiltre & ";"

[dynexd]

Merci pour ta réponse mais tu as du mal me comprendre , ce que tu me donnes permet dafficher une seule ligne ds la liste deroulante et n'en preselectionnes aucune
moi en fait ce qu'il me faut c'est la liste deroulante qui affiche toute une table mais qui preselectionne le truc de mon choix

[djefff75]

et pourquoi n'utilise donc pas de la meme manière la methode ...

Code :

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

1
2
3
 
Me!Liste.Selected(NomFiltre) = true
ou Me!Liste.Selected(IndiceNomFiltre) = true

[dynexd]

http://access.developpez.com/faq/?page=zdl#SelLignezdl

ce tuto marche-t-il avec les zones de listes deroulantes ???
j'ai erreur d'execution 13 , erreur d'incompatibilité

[dynexd]

en fait j'ai de nouveaux soucis puisque meme le .Selected(0) ne marche pas ......


j'obtient:

erreur de compilation
membres de methode ou de donnees introuvables


DoCmd.OpenForm "frmModArticles", acNormal, , , acFormEdit, acWindowNormal, "Modification"

j'ouvre ma fenetre depuis un autre formulaire via cette ligne, je suis dans le bon mode ?


Et est ce que le selected marche de la meme maniere aussi bien avec les zones de listes que les zones de liste deroulante ?

[dynexd]

Selected ne marchait donc pas avec les zones de listes deroulantes

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
 
Dim maCat As Integer
maCat = categories_id
Dim i As Integer
For i = 0 To Me.etiCategories.ListCount - 1
If Me.etiCategories.Column(0, i) = maCat Then
Me.etiCategories = Me.etiCategories.ItemData(i)
 
End If
 
Next i

et ca marche enfin ^^

thx arckham