Discussion :

[Salyanov]

Bonjour à toutes et à tous,

D'avance, je vous remercie pour l'attention que vous accorderez à ma requête.

Je travaille une base de données Access. J'ai créé un formulaire FormNC lié à une requête ReqNC. J'ai mis ce formulaire en mode Formulaire uniquement, sans ligne de séparation ni sélecteur, afin de donner une allure plus jolie à l'application.

Ce formulaire comprend de nombreux champs, dont trois sur lesquels je tiens à appliquer un filtre :
- ChampA (champ texte)
- ChampB (champ date)
- ChampC (champ booléen)

Je crée donc trois outils en haut du formulaire :
- Une zone de texte txtFiltreA
- Une liste déroulante paramétrée lisFiltreB
- Une case à cocher chkFiltreC

J'ajoute également un bouton cmdFiltre qui filtre les données reprises selon les informations encodées par l'utilisateur dans txtFiltreA, lisFiltreB et chkFiltreC.

Ensuite, je crée une macro Access pour l'événement "clic" sur cmdFiltre (bien via l'interface création de macro en Access, et non en VBA puisque je ne suis pas encore assez à l'aise en VBA, mais je possède quelques rudiments et j'essaye de progresser).

Voici la macro :

1. Si txtFiltreA Est Null Alors
2. Zone de Message : Veuillez encoder une valeur dans txtFiltreA
3. ArrêtMacro
4. Sinon si lisFiltreB Est Null Alors
5. Zone de Message : Veuillez encoder une valeur dans lisFiltreB
6. ArrêtMacro
7. Sinon
8. Appliquer Filtre : ChampA = txtFiltreA Et ChampB = lisFiltreB Et ChampC = chkFiltreC
9. Fin Si

La macro fonctionne sans souci lorsqu'il existe des lignes dans ReqNC qui correspondent au filtre : l'ensemble des données retournées par le filtre n'est pas vide. Le formulaire FormNC fonctionne alors sans problème, les calculs souhaités se déroulent sans accroche, etc.

Par contre, si aucune donnée dans ReqNC ne répond à la triple condition txtFiltreA, lisFiltreB et chkFiltreC, le résultat après appui sur le bouton cmdFiltre est... un formulaire vide, une page monochrome, sans même l'apparition des labels, des boutons, des champs, des lignes, etc. Tout disparaît et plus aucun moyen de modifier txtFiltreA, lisFiltreB et chkFiltreC... En somme, un gros bug pour l'utilisateur qui ne sait plus rien faire, si ce n'est quitter l'application.

J'ignore comment je peux supprimer ce bug. Existe-t-il une fonction en macro qui permet d'annuler la macro si le résultat d'un filtre est un ensemble vide ? Dois-je effectuer un test supplémentaire ? Pourquoi le formulaire devient une zone monochrome, au lieu de ne retourner aucune valeur mais en conservant l'affichage des labels, boutons, etc. ?

Y a-t-il une solution via l'édition de macro en Access ? Ou faut-il passer par du VBA ? Voire du VBA avec du SQL intégré ?

Je suppose que pour la plupart d'entre vous, mon erreur dans la confection de ce formulaire est manifeste...

Merci à toutes les bonnes âmes indulgentes qui voudront bien m'ouvrir les portes sur lesquelles je me cogne encore la tête, faute de lumière ! ;-)

Bonne journée,

[marot_r]

Bonjour.

Dans un sens c'est un peu normal. si il n'y a pas de données il n'y a pas d'affichage.

Quand tu dis :

Je crée donc trois outils en haut du formulaire :

Est-ce que tu parles de l'entête du formulaire ? Si non, essaye en mettant tes champs dans l'entête. Il me semble qu'elle est toujours affichée.

Une autre solution est de mettre tes champs de sélection dans un formulaire et d'inclure ton formulaire d'affichage en sous-formulaire.
Cela complique un peu l'écriture du critère mais cela marchera.

A+

[Salyanov]

Bonjour,

Un grand merci pour ta réponse. Tu me fais découvrir le sous-formulaire et ses possibilités. Je viens de tester et en effet, cela fonctionne.

Je mets les trois champs de recherche dans un formulaire, et le reste en sous-formulaire. Tant qu'il n'y a pas de résultat de recherche, le sous-formulaire reste en "monochrome". Mais au moins les trois champs de recherche et le bouton de filtre restent visibles et donc utilisables.

Cela complique la structure, mais au moins le résultat est là.

Cordialement.

[marot_r]

Bonjour.

Si tu considère que la réponse est complète, merci d'appuyer sur en bas de discussion.

A+