Discussion :

[kichnifou]

Bonjour,

j'ai une liste déroulante

un bouton "rechercher"

une zone de texte

--> comment faire en sorte que, lorsque je clique sur rechercher, il prenne en compte le choix fait dans la liste déroulante, exécute une requête et stock le contenue de celle-ci dans la zone de texte

Merci d'avance

[theuma]

Sur l'appui de ton bouton rechercher tu doit executer du code en VB

Code :

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

1
2
3
Private Sub Commande32_Click()
Texte33.Value = Modifiable24.Value
End Sub

Quelque chose de ce type la ...

Commande32 = ton bouton rechercher
Texte33 = ta zone de texte
Modifiable24 = ta liste déroulante

[theuma]

Si ton problème et résolu clique en bas du tuto sur le bouton résolu ...

[kichnifou]

En fait, j'ai réussis à faire en sorte que, lorsque je clique sur rechercher, cela m'ouvre la requête correspondant au choix fait dans la liste déroulante :

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
Dim stDocName As String
If Me.listesolv = "Agrosolvants" Then
 
    stDocName = "Agrosolvants"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
 
ElseIf Me.listesolv = "Solvants classiques" Then
    stDocName = "Solvants"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
 
Else
    stDocName = "Tous_type_solvant"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
 
End If

Mais maintenant ce que j'aimerais c'est que, au lieu que cela m'affiche la requête, cela me place le contenu de la requête dans un champs texte (nommé provisioirement "Texte170")
Est-ce possible?

[theuma]

apres ton EndIf tu ecrit

Code :

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

Texte170.Value = stDocName

et ca devrait marché et supprime ou met en commentaire les 3 "DoCmd.OpenQuery stDocName, acNormal, acEdit"

[kichnifou]

Lorsque j'ajoute :

Code :

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

Texte170.Value = stDocName

ma zone de texte m'affiche le nom de la requête, et non son contenu
(son contenue est un table avec un liste de solvant)