Discussion :

[Pitou5464]

Salut à tous,

J'ai un formulaire principal et un sous-formulaire. Je souhaite ouvrir un autre formulaire mais je ne sais pas comment déterminer son record source.

Code :

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

1
2
3
4
5
6
Dim str as string
Dim a as string
a = Forms!sous-formulaire.num
DoCmd.OpenForm ("Formulaireàouvrir"), acnormal
str = "SELECT Table.* FROM Table WHERE Table.num = '" & a &"'"
Forms!Formulaireàouvrir.RecordSource = str

Merci à tous

[marot_r]

Le plus simple est de laisser Access travailler pour toi.

1) Fait ton formulaire basé sur ta source de données Table.
2) Appele le formulaire par

Code :

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

1
2
 
DoCmd.OpenForm  NomDuForm,,,"[num] = '" & a &"'"

A+

[Pitou5464]

J'ai une jolie réponse "l'opération OpenForm à été annulé"
est ce que ce serait un problème dans la variable?

[Pitou5464]

En fait il fallait enlever les ' parce que ce n'est pas du texte mais une valeur numérique. Je crois...En tout cas ça marche. Merci.