Discussion :

[safrane]

Bonjour,

j'ai fait une requête parametrée sous access 2003, j'ai également fait un formulaire à partir de cette requête dans lequel j'ai créé un bouton pour choisir une autre valeur mais le résultat s'ouvre comme feuille de donnée et je voudrais que cela soit comme le formulaire.

merci pour votre aide

safrane

[FreeAccess]

Bonjour,

Pas tout compris........

....j'ai créé un bouton pour choisir une autre valeur mais le résultat s'ouvre comme feuille de donnée et je voudrais que cela soit comme le formulaire.

Vérifie que la propriété "Affichage par défaut" de ton formulaire soit sur "Formulaire unique" et non "Feuille de données".....

[safrane]

Bonjour,

Mon formulaire est bien en continu et non en feuille de données, quand je clique sur le bonton de commande, il m'ouvre une msgbox dans laquelle il faut introduire une valeur et ensuite quand je clique sur ok, le résultat s'ouvre comme une feuille de donnée (requête parametrée) et je voudrais que cela soit un formulaire qui s'ouvre.

[Invité]

Bonjour

Quel est le code derrière ta msgbox ?

[safrane]

bonjour,

je ne sais pas quel est le code de msbox, puisque j'ai fait une requête parametrée, que j'utilise dans mon formulaire.

[FreeAccess]

Re,

Mon formulaire est bien en continu et non en feuille de données....

...Oui, mais moi je t'ai demandé de le passer en "Formulaire unique" et non en "Formulaires continus"....... (dans ce mode, tous les enregistrements se trouvent les uns en dessous des autres....)

[Invité]

bonjour,

je ne sais pas quel est le code de msbox, puisque j'ai fait une requête parametrée, que j'utilise dans mon formulaire.

Cette requête ne doit pas être la source de ton formulaire, sinon il te demanderait les paramètres à l'ouverture.

Est-ce que c'est la source d'un sous-formulaire ?

J'ai l'mpression que tu as utilisé l'assistant pour créer le bouton qui te lance ta requête, et que celle-ci n'est pas liée à ton formulaire.

[safrane]

mon formulaire est mode unique, je me suis trompée



non ce n'est pas la source d'un sous-formulaire et j'ai effectivement utiliser l'assistant pour créer le formulaire et le bouton.

[Invité]

Re

Mets ton formulaire en mode création, tu double-cliques sur le bouton, dans l'onglet évènement sur sur la ligne click tu vas au bout à droite, tu cliques sur les 3 points, tu accèderas au code. Tu fais un copier coller sur le forum, pour que l'on voye ce qu'il y a derrière.

[safrane]

voilà le code du bouton en question

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
Private Sub choix_par_mot_clef_Click()
On Error GoTo Err_choix_par_mot_clef_Click
 
    Dim stDocName As String
 
    stDocName = "choix mot clef"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
 
Exit_choix_par_mot_clef_Click:
    Exit Sub
 
Err_choix_par_mot_clef_Click:
    MsgBox Err.Description
    Resume Exit_choix_par_mot_clef_Click
 
End Sub

[Invité]

Re

C'est bien ce que je pensais, tu lances une requête avec ce bouton, celle-ci sera toujours en mode feuille de donnée et n'est pas incluse dans un formulaire.

[safrane]

et comment puis je faire pour l'inclure dans un formulaire qui permette de faire une recherche sans avor revenir au point de départ?

[FreeAccess]

Ici ton code ouvre une requête.....il faut donc que tu ai un formulaire basé sur cette requête.....et ouvrir ce même formulaire en employant....:

Code :

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

DoCmd.OpenForm "NomDuFormulaire.......

....regarde l'aide en ligne d'ACCESS pour plus de détail......ou fais quelques recherches dans la .......ou les anciens posts......

[safrane]

J'ai un formulaire basé sur cette requête, et je ne vois pas où je dois aller mettre ce code?

[FreeAccess]

....et bien sur le même bouton qui ouvrait ta requête....
Simplement utilse [DoCmd.OpenForm] au lieu de [DoCmd.OpenQuery]...

Pour le reste utilise l'aide d'ACCESS...

[safrane]

j'ai utilisé ce code mais cela ne foctionne pas, je n'arrive pas à introduire à une autre valeur pour continuer les recherches. la msgbox ne s'affiche plus, comment faire pour qu'elle s'affiche quand je clique sur le bouton

[Invité]

Re

La msgbox de demande de paramètres doit s'ouvrir automatiquement, car il va manquer des informations à la requête.

Peux-tu nous remontrer le code que tu as modifié à la suite des informations que t'a donné FreeAccess. ?

[safrane]

voici le code modifié suite aux info de Freeaccess

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
Private Sub choix_mot_clef_Click()
On Error GoTo Err_choix_mot_clef_Click
 
    Dim stDocName As String
 
    stDocName = "choix mot clef"
    DoCmd.OpenForm "choix mot clef"
Exit_choix_mot_clef_Click:
    Exit Sub
 
Err_choix_mot_clef_Click:
    MsgBox Err.Description
    Resume Exit_choix_mot_clef_Click
 
End Sub

que dois je faire pour que cela fonctionne?

[Invité]

Re

Donc en résumant tu as un formulaire qui s'appelle choix mot clef et qui a pour source ta requête, et tous les champs de la requête sont sur le formulaire ?

Voilà ce qui devrait être fait pour que cela fonctionne comme tu veux.

[safrane]

re,

tu as bien résumé et tous les champs sont sur le formulaire mais je ne vois toujours comment faire les recherches à partir de la msgbox?