utiliser une variable pour créer le record source d'un état en VBA

Bonjour,

Je voudrais faire en sorte que la source de mon état change en fonction de la sélection faite dans une liste déroulante.
J'ai une liste déroulante contenant différents noms de champ, et en fonction de la sélection, le recordsource serait changé en utilisant cette sélection. J'ai ce début de code mais je ne sais pas comment encadrer ma variable pour le le code soit correct :

Code:

---

1 2 3 4 5 6

Private Sub btn_etat_PL_Click() variable$ = Me![Modifiable_PL] DoCmd.OpenReport "3-lignePL", acViewPreview Me.RecordSource = "Select * FROM REVIVAL WHERE [ligne P&L] =" variable";" End Sub

---

Ca ne marche pas comme ça et je cherche donc la syntaxe pour intégrer ma variable dans la requête.

bonjour,

alors tout dépend du type de ta variable...
Ca doit surment être un string donc il faut que tu écrive ca comme suit :

Code:

---

1 2	Me.RecordSource = "Select * FROM REVIVAL WHERE [ligne P&L] = '" & variable & "'"

---

Normalement cela devrait fonctionner.
Tu n'as pas besoin du ; normalement non plus

j'essaie.

Sinon j'ai essayé ça :

Code:

---

DoCmd.OpenReport "3-lignePL", , , "[ligne P&L] =" & Me![Modifiable_PL]

---

Mais ça ne fonctionne pas...

J'ai essayé avec le code que tu m'as donné, pas d'erreur affichée mais le record source n'est pas modifié bizarrement.
Le code complet, c'est ça :

Code:

---

1 2 3 4 5

Private Sub btn_etat_PL_Click() variable$ = Me![Modifiable_PL] DoCmd.OpenReport "3-lignePL", acViewPreview Me.RecordSource = "Select * FROM REVIVAL WHERE [ligne P&L] = '" & variable & "'" End Sub

---

pour ouvrir un état (enfin dans mon cas pour l'imprimer) j'utilise ca :

Code:

---

DoCmd.OpenReport "MonEtat", acViewNormal, SOURCE

---

avec SOURCE qui est une variable de type string qui contient ma requete SQL.
Et voila

Je ne comprend pas pourquoi

Code:

---

variable$ = Me![Modifiable_PL]

---

me renvoie le numéro de position du texte choisi dans la liste au lieu de me donner le texte lui-même..
Tu saurais comment changer ça ?

ton but est simplement que l'état s'ouvre en fonction de la sélection faite. C'est-à-dire que tu sélectionne ce que tu veux, et après tu clique sur un bouton qui ouvre ton état...
Alors tentes ma solution :

DoCmd.OpenReport "MonEtat", acViewNormal, "Select * FROM REVIVAL WHERE [ligne P&L] = '" & variable & "'"

Dans ton état, tu lui as mis que la source de l'état était la table REVIVAL ?

oui.

C'est bien ce code que j'ai mis mais mon souci c'est que le résultat de "variable", c'est par exemple "8", au lieu de "FG Fixed" car celui-ci est en 8e position dans la liste.
Je pense que l'erreur vient de l'initialisation de variable qui n'est pas correcte.

Si tu as une colonne cachée dans ta liste, tu peux y accéder par Me.taListe.Column(1)
Me.taListe te renvoie la valeur de la colonne 0 (qui peut être masquée)

Code:

---

1 2 3 4 5

Private Sub btn_etat_PL_Click() variable$ = Me.[Modifiable_PL].Column(1) Debug.Print variable DoCmd.OpenReport "3-lignePL", acViewPreview, "SELECT * FROM REVIVAL WHERE [ligne P&L] = '" & variable & "'" End Sub

---

impeccable, merci Gary, merci Oleff !