Discussion :

[Dr Byby'San]

Bonjour,

J'ai une formulaire me permettant de sélectionner une requête et, à l'aide d'un bouton, je lance la requête sélectionnée.
Mon soucis est que le résultat de la requête (Table, Tableau croisé ou graphique) apparait derrière mon formulaire (qui est pas mal grand).

Je souhaiterais que ce résultat soit affiché en premier plan avec un focus dessus (qu'on ne puisse pas toucher au formulaire tant que la fenêtre n'est pas fermée).

Voici le code qui est lancé :

Code :

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

1
2
3
4
Private Sub List_Requetes_DblClick(Cancel As Integer)
' Au double-clic, on lance la requête sous forme de table
DoCmd.OpenQuery Forms![Accueil].List_Requetes.Column(0), acViewNormal
End Sub

Merci de votre aide !

[robyseb]

tu n'a qu'à mettre la propriété modale de ton formulaire de résultat sur "oui"

[Dr Byby'San]

Le soucis doit être que le résultat n'est pas un formulaire.

Pourriez vous m'indiquer le code vba pour faire en sorte que le résultat soit dans un formulaire ?

Merci !

[robyseb]

Tu peut créer un nouveau formulaire en mode feuille de donnée et à son ouverture sur l’évènement form_load tu peut écrire :

Code :

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

1
2
3
4
5
6
Sub Form_Open()
Dim strNewRecord As String
 
strNewRecord = Forms![Accueil].List_Requetes.Column(0)
Me.RecordSource = strNewRecord
End Sub

[Dr Byby'San]

Ok. Merci pour l'information.
Par contre, je ne peux pas effectuer mes sorties sous forme de formulaire de données.
En effet, lors de la création du formulaire, il demande des noms de variable à afficher et pour toutes les requêtes que je lance, il me garde ces mêmes noms de variables (alors que ces variables ne sont jamais les mêmes).

Y'a t il moyen de générer dynamiquement les variables à afficher (les variables de la requete) ?

Si non, la fenetre générée par ma commande OpenQuery, ne peux t on pas lui associer des propriétés ? Des codes évènementiels ?

[robyseb]

Bonjour ! Pour la fenêtre native de Access je ne croit pas qu'il soit possible de lui attitrer des évènements !!

Ensuite, je peut t'assurer que c'est possible de créer un formulaire comme je te l'ai expliqué ... si tu a des problèmes comme tu le cite !

En effet, lors de la création du formulaire, il demande des noms de variable à afficher et pour toutes les requêtes que je lance, il me garde ces mêmes noms de variables

Normalement ca se produit parce qu'il y a une erreur de conception !!

Si tu n'a pas encore essayé le bout de code que je t'ai donnée alors essai le.

[Dr Byby'San]

Dommage ...

J'ai de nouveau testé le code que tu m'as fourni. Le seul hic qu'il me reste, c'est que les variables qui sont affichées au lancement de ce code sont celles que j'ai utilisée lors de l'initialisation du formulaire.

Car j'imagine qu'il faut tout d'abord créer le formulaire qui va afficher les résultats (et c'est lors de cette création qu'il me demande les variables à afficher) et ensuite faire appel à lui.

A moins que la version soit en cause (2003)

[robyseb]

bonjour !

je vais essayer de t'aider de mon mieux donc reprenons du début.

1. il te faut créer un formulaire vierge
2. Ensuite dans le mode création tu va dans l'onglet Format, qui se trouve dans les propriétés du formulaire.
3. u clique sur les trois petits point à coté de "Affichage par défault" tu choisi feuille de données.
4. tu sauvegarde ton formulaire avec le nom que tu désire par exemple "Form_resultat"

Dans ton premier formulaire qui possède ta liste de choix tu écrit dans la procédure :

Code :

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

1
2
3
4
5
6
Private Sub List_Requetes_DblClick(Cancel As Integer)
dim requete as string 
requete = me.List_Requetes.Column(0)
' Au double-clic, on lance la requête sous forme de table
DoCmd.openform "Form_resulat" , , , , , , requete
End Sub

Ensuite dans ton nouveau formulaire tu va dans VB avec Alt F11 ou tu clique dans les propriétés de ton formulaire sur "Sur Chargement" qui va t'ouvrir VB automatiquement.

Donc là tu y inscrit ce code :

Code :

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

1
2
3
Sub Form_Open()
Me.RecordSource = me.openargs
End Sub

ensuite sur fermeture du formulaire résultat:

Code :

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

1
2
3
Sub Form_Close()
me.RecordSource = ""
End Sub

Ce qui permettra d'effacer les données pour la prochaine ré-ouverture.

[Dr Byby'San]

Bonjour !

J'ai suivi avec attention tes instructions. Ce système semble bien prendre ma requête (je le vois au nombre d'enregistrements en bas de la fenêtre), mais il n'a aucune colonne a montrer me semble t il. Tous les résultats sont vides (Aucune colonne, mais le bon nombre de lignes)

Sais tu comment indiquer au formulaire Résultat qu'il doit lire les variables à partir de la requête (toutes les colonnes de toutes les requêtes sont à présenter).

Mais, cela ne me règle pas le problème de focus des fenêtres (point initial).

Merci beaucoup de ton aide

[tee_grandbois]

Bonsoir,
en principe la fenêtre de résultat d'une requête s'affiche au premier plan par défaut (en tout cas jusqu'à la version 2003).
Si ce n'est pas le cas, c'est que ton formulaire appelant a sa propriété "Fenêtre indépendante" à Oui, mets la à Non et cela devrait fonctionner (et donc, pas besoin d'un autre formulaire pour afficher les résultats).

[robyseb]

Bonsoir !

A tu bien indiquer le mode Feuille de données ? Ce mode créer exactement la même fenêtre que celle que tu utilisait avec ton autre commande, donc elle se formate selon les données qu'il y a à afficher !

ensuite pour rendre ton nouveau formulaire au premier plan il ne te reste qu'à aller dans les propriétés "Autres" du formulaire et tu met la propriété Indépendante à Oui, et Modal à oui, le mode modal indique à Access que la fenêtre doit absolument être au premier plan puisque celle-ci doit être fermé afin de continuer ailleurs.

peut tu poster un exemple de une de tes requêtes pour comprendre pourquoi elle n'affiche rien ?

[Dr Byby'San]

C'est exactement ce qu'il me fallait. (Propriété Fenêtre indépendante du formulaire). Du coup, mes résultats s'affichent maintenant au premier plan.

Oui Oui. J'ai bien indiqué le mode feuille de données comme tu me l'as indiqué.
Je pense que la différence de comportement vient du fait qu'avant j'utilisais une Requete avec une "OpenQuery" (et cela me mettait bien les résultats) et que là ont fait appel à un formulaire qui doit être formaté (lui indiquer quels champs afficher).

Mes requetes sont de la forme :

Code :

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

Select Nom, Prénom, Adresse From Patients

Merci à vous deux !