Discussion :

[toto10]

Slt

Je voudrais ouvrir un formulaire correspondant à une seule ligne d'un autre formulaire.

J'ai mis un bouton au bout de chaque ligne de mon formulaire principal, et je voudrais que lorsqu'on clique dessus, cela ouvre un nouveau formulaire avec seulement les infos de la ligne correspondante (+ d'autres)

Exactemenet comme dans ce tuto(partie V Compléments):http://cafeine.developpez.com/access...echerchemulti/

J'ai donc créer un nouveau formulaire appelé "form2"

Ma table et formulaire principal s'appelle "TI"
La clef est "Number"
Le bouton est "Btn"

J'ai donc mis ce code au clic de mon bouton mais ça ne marche pas

Code :

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

DoCmd.OpenForm "form2", acNormal, "TI.[Number] = " & Me.Btn

Je crois que le problème que moi les résultats ne sont pas dans une listbox, mais c'est un formulaire "normal".

Comment faire?

Merci

[Demco]

Code :

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

DoCmd.OpenForm "form2", acNormal, "TI.[Number] = " & Me.Btn

Tu lui dis que le champ Number de TI doit avoir pour valeur un bouton, est-ce vraiment ce que tu veux ?

[toto10]

Effectivement çà peut pas marché.

Mais comment lui donner la valeur "Number" correspondant à la ligne ou se trouve le bouton?

Merci

[FreeAccess]

Bonjour,
Je crois que Demco t'a mis sur la voie

Tu peux trés bien récupérer la valeur d'un champ qui se trouve sur ton Formulaire.

Code :

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

DoCmd.OpenForm "form2", acNormal, "TI.[Number] = " & Me.MonChamp.Value

En espérant avoir compris ton problème
Bonne continuation.

[@rkane]

Salut FreeAccess,
en parcourant je viens de tomber sur cet article, j'ai un probleme similaire je pense : ouverture d'un form B à partir de l'enregistrement d'un form A en continu.
Est-ce que je peux utiliser ce script ?
Excuses à Toto de me greffer sur son post.

[FreeAccess]

Bonjour,

Excuses à Toto de me greffer sur son post.

Et oui, pas bien ça
Pour ton problème, je pense que ce code (après adaptation) peut fonctionner......mais le mieux est encore d'essayer.
Sinon regarde ici, dans ce tuto, dans la partie "Compléments"
http://cafeine.developpez.com/access...echerchemulti/

Bonne continuation.

[@rkane]

Ok FreeAccess, je vais regarder ce tuto de suite, because je n'ai pas encore trouve ma solution.
Merci à + Patrick

[@rkane]

Rebonsoir FreeAccess,
bon... finalement trouvé la combine :

Code :

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

DoCmd.OpenForm stDocName, acNormal, , "TableCommune.NumeroFiche=" & Me.NumeroFiche

En me referant à un ancien probleme d'impression de formulaire pour lequel tu m'avais aide si ma memoire est bonne... Merci pour ton message et je garde sous le coude le tuto cité en reference.
PS : Toto tu peux t'inspirer de mon script je pense que tu avais le meme probleme que moi. Excuses moi encore d'avoir squatter ton post. Si eventuellement je peux t'aider... T'hésites pas. Moi y'en avoir petit niveau, mais sait-on jamais !

[toto10]

Slt,

J'ai fais ce code:

Code :

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

DoCmd.OpenForm "form2", acNormal, "TI.[Number] = " & Me.[Number]

Mais le bouton ouvre tout le temps l'autre formulaire sur le 1er élément, et pas celui correspondant à la ligne ou se situe le bouton.

[@rkane]

Sois plus explicite because il est pas clair ton message...
Compare ton script et le mien, tu verras... les differences sont flagrantes.

[toto10]

Ma table TI a comme clef le champ "Number"
Mon formulaire principal s'appele aussi TI, et se présenate comme suit:

Nom, Number
toto, 1
tata, 2
tutu, 3

Sur chaque ligne de ce formulaire, il y a un bouton ouvrir.
Je voudrais que lorsque je clique sur le bouton se trouvant sur la 2eme ligne (tata, 2), cela m'ouvre le 2nd formulaire (appelé "form2") correspondant à "tata, 2".

Or, en mettant ce code:

Code :

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

DoCmd.OpenForm "form2", acNormal, "TI.[Number] = " & Me.[Number]

sur le clic du bouton, cela m'ouvre à chaque fois le formulaire "form2" sur le 1er enregistrement, en l'occurence "toto, 1".

J'éspère avoir été plus clair, et je pense que mon code correspond au tien, je ne vois pas de différences flagrantes dessus.

Merci de m'eclairer.

[FreeAccess]

Bonjour,

sur le clic du bouton, cela m'ouvre à chaque fois le formulaire "form2" sur le 1er enregistrement, en l'occurence "toto, 1".

Je vois que tu galére toujours sur ton problème
Alors pour commencer, as tu vraiment besoin de mettre un bouton de commande devant chaque ligne pour accéder à ton formulaire2
Car actuellement le code que tu crée sur chaque bouton ne fait que récupérer la valeur de ton champ "Number" (donc à chaque fois = 1). Et comment sont créer tes boutons lorsque tu auras plus de 3 enregistrements
Comme expliqué dans le tuto, met ton code sur l'événement 'Sur double click' et teste

[@rkane]

salut Toto,
ton form principal (le TI) est en mode simple ou mode continu ?

[toto10]

Mon formulaire principal TI est en mode continu

J'ai mis ce code

Code :

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

DoCmd.OpenForm "form2", acNormal, "TI.[Number] = " & Me.[Number]

sur le double-clic de la ligne du formulaire, et ça m'ouvre toujours "form2" sur le 1er enregistrement.

Je galère, je galère

[FreeAccess]

Re,
Et si tu essayais de rentrer le bon code

Code :

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

DoCmd.OpenForm "form2", acNormal, , "TI.[Number] = " & Me.[Number]

[toto10]

Effectivement, j'avais pas fait gaffe à cette virgule.

Par contre, lorsque je double-clique sur une ligne, une petite fenêtre apparait me demandant de rentrer une valeur de paramètre.

[FreeAccess]

Re,
C'est normal
Allez j'explique rapidement :
Sur ton Form2, il faut que tu ai un champ nommé "Number" (format texte)
Dans le code tu tape:

Code :

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

DoCmd.OpenForm "FormAOuvrir", acNormal, , "[ChampForm2] = '" & Me.ChampForm1 & "'"

Normalement ChampForm2 devrait correspondre à ton champ "Number".
Ici, on rajoute des apostrophes car il s'agit de champ texte. Pour des champs au format numérique il suffit de les enlever.
Normalement, cela fonctionne correctement.

[toto10]

C'est bon, merci pour tout, j'ai enfin réussi.

Effectivement, mon champ "Number" était en type texte, car il y a des lettres dedans et donv il fallait bien ajouter les apostrophes.

Et ça marche également pour le bouton que je voulais tant lol.

Merci beaucoup.

[dzouve]

Re,
C'est normal
Allez j'explique rapidement :
Sur ton Form2, il faut que tu ai un champ nommé "Number" (format texte)
Dans le code tu tape:

Code :

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

DoCmd.OpenForm "FormAOuvrir", acNormal, , "[ChampForm2] = '" & Me.ChampForm1 & "'"

Normalement ChampForm2 devrait correspondre à ton champ "Number".
Ici, on rajoute des apostrophes car il s'agit de champ texte. Pour des champs au format numérique il suffit de les enlever.
Normalement, cela fonctionne correctement.

Salut, je viens d'essayer ce code pour une de mes applications et une fois adapté, il marche bien.
J'ai juste une petite question, est ce que ce code défini le mode d'ouverture (affichage formulaire / liste)
Car cela m'ouvre un fourmulaire en mode formulaire et j'aimerais qu'il soit affiché en mode feuille de données

Merci d'avance
dzouve

[dzouve]

J'ai trouvé moi-même la réponse. Pour afficher en mode de feuille de données il faut mettre acFormDS au lieu de acNormal

dzouve