Discussion :

[pa4440]

Bonjour

J’avais réalisé il y a quelque année une base sur filemaker pour la gestion d’une association sportive
(gestion membre, suivi paiement licence, etc..)
Pour simplifier l’utilisation j’avais mis dans l'entête d'un formulaire des boutons permettant de faire des requêtes (exemple tri des membres n’ayant pas payés leur cotisation, etc…)

Je refait actuellement cette base sur Access 2013

Cela fonctionne actuellement mais il y une chose qui me gène. Je n’arrive pas à faire un formulaire commun pour plusieurs requêtes car
à la création d’un formulaire, Access demande de choisir une requête.

J’ai donc crée plusieurs requêtes que j’active avec des boutons et j’ai crée autant de formulaires pour pouvoir afficher mes données
Exemple
R_juniors et F_vue_req_juniors
R__membre_radié et F_vue membre radié

Le problème est que si je veux modifier quelques choses dans la présentation de mon formulaire je doit le faire pour tous les autres formulaires.

Donc simplement j’aimerai forcer le résultat d’une requête dans un formulaire unique
Exemple
R_juniors et F_vue_tri
R__membre_radié et F_vue_tri

Cela parait bête mais j’ai cherché sur internet sans succès

Un lien vers un modèle de base de ce type me serait très utile.

Merci.

[nico84]

Bonjour

à la création d’un formulaire, Access demande de choisir une requête.

Pas nécessairement et de toute façon en VBA elle peut être modifiée, filtrée ou triée :

Code :

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

1
2
3
Me.RecordSource = "SELECT ... "
me.filter =  ...
me.orderby = ...

[pa4440]

Merci j'ai réussis avec vos indications
Cela me simplifie grandement la chose

Mais je me pose la question si je ne peux pas aussi supprimer toutes mes requêtes
avec la commande Me.Filter mais je ne trouve pas la syntaxe correcte
j'ai crée une requête "Rech Tous" dans le lequel j'ai sélectionné tous les champs de ma table "Membres" sans critère de sélection.
Je veux afficher dans mon formulaire via un bouton les membres dont le champs "Status" et égal à la chaine de caractère "Radié"

J'ai testé plusieurs solutions sans succès
Exemple
Private Sub Commande100_Click()
Me.RecordSource = "SELECT * FROM [Rech Tous]"
Me.Filter = " [Status] = 'Radié' "
End Sub

[nico84]

C'est correct et avec cette méthode inutile de modifier le recordsource
Si ça ne marche pas c'est probablement juste parce qu'il manque

Code :

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

me.filteron=true

Il me semble que la modification du recordsource réinitialise le tri et le filtre

[pa4440]

Merci Nico84 cela avance bien

Mais j'ai un message venant certainement de champs qui ont été ajoutés automatiquement à la table depuis la création d'un champ Photo type pièce jointe

Entrez une valeur de paramètre

Table Membres.Photo.FileData
Photo.FileFlags
Table Membres.Photo.FileName
Photo.FileTimeStamp
Table Membres.Photo.FileType
Photo.FileURL

Pourtant les champs sont bien dans ma requête Rech Tous

[nico84]

Je n'ai jamais utilisé le type "pièce jointe", j'ai juste qq photos en "objet OLE" (qui stocke la photo dans la base)