Discussion :

[Boxtell]

Bonjour,

J'ai vu beaucoup de personne qui cherche à générer des états à partir de listes déroulantes.

Je souhaiterais faire la même chose à partir d'une zone de liste classique (Alimentée par une requête).

L'utilisateur sélectionnerais les lignes qui l'intéresse dans la zone de liste (sélection multiple), cliquerais sur un bouton et MAGIE : les lignes sélectionnées apparaissent les unes en dessous des autres dans un état.



(Imaginons que l'utilisateur ai cliqué sur ces lignes, il n'a plus qu'a appuyer sur un bouton pour afficher celles-ci dans un état).

Merci d'avance pour votre aide.

[martii843]

Salut,

Tu dois créer ton formulaire puis insérer ce code dans le bouton qui lancera l'aperçu du formulaire.

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
 
Dim Vari As Variant
Dim FILTRE As String
  FILTRE = ""
    For Each Vari In Forms!TonForm!TaListe.ItemsSelected
      If FILTRE <> "" Then FILTRE = FILTRE & " Or "
 
' SI le champ de ta requête est de type Texte
        FILTRE = FILTRE & "[ChampDeTaRequete]='" & _
' SI le champ de ta requête est de type Numérique
        FILTRE = FILTRE & "[ChampDeTaRequete]=" & _
 
          Forms!TonFomulaire!TaListe.ItemData(Vari) & "'"
      Next Vari
 
DoCmd.OpenReport "TonEtat", acViewPreview, , FILTRE

[Boxtell]

Parfait, cela fonctionne ! Tu m'enlève une épine du pied, après une matinée de recherche je ne croyais jamais trouver de réponses !

Petite question supplémentaire, j'ai dans ma liste 8 colonnes, cependant j'aimerais que sur ces 8 colonnes, seulement 4 apparaissent sur mon état. Comment traduire cela dans le code VBA que tu m'a fourni ?

Cordialement

[martii843]

Tu peux modifier ça dans ton état directement, en mode création,en supprimant les champs que tu ne veux pas.

[Boxtell]

En effet, c'est tellement basique que je n'y pensais plus !

Merci je crois que ce post est résolu