Requête et fonction

Fermé
rvig Messages postés 1 Date d'inscription vendredi 16 octobre 2015 Statut Membre Dernière intervention 16 octobre 2015 - 16 oct. 2015 à 20:19
 Tessel75 - 19 oct. 2015 à 20:45
Comment passer la valeur d'une fonction comme critère dans une requête access.

Voici la fonction que j'ai crée:

Function Annee_Desire() As Integer

Annee_Desire = InputBox("Quelle Année? : (aaaa)", "Année Désirée", Year(Now()))

End Function

Je veux utiliser Annee_Desire() comme critère de recherche.

Merci d'avance.

2 réponses

bonjour
Tu peux faire une requete parametrée.
En mode creation dans le champ année desirée tu inscris ceci
[Quel année voulez vous?] par exemple.
Lorsque tu ouvriras ta requete la question sera posée. tu repons par l'année que tu as dans les enregistrements
0
Merci pour ta réponse. Ça fonctionne très bien de cette façon mais je desire passer au sein de mes requêtes une variable qui serait entrée une seule fois. La variable en question pourrais être utilisée par une dizaine de requêtes. C'est pas évident ! Salutation.
0
Bonjour,
Dans ton cas, entrer une seule fois une variable pour l'utiliser dans plusieurs requêtes, il faut ruser, en l'occurrence envoyer la valeur entrée sur un formulaire masqué et faire référence à la valeur du contrôle pour toutes les requêtes. Il est nécessaire de passer par un bout de VBA.
ça donnera un truc du genre:
Fonction EntrerVariableCachee
AnneeDesire = InputBox("Quelle Année? : (aaaa)", "Année Désirée", Year(Now()))
DoOpenForm "FormulaireMasque",,,,, AcHidden (vérifier le rang de AcHidden)
Forms!FormulaireMasque!ContrôleDonnee = AnneeDesire
End Function

Après il suffit que les requêtes utilisent "Forms!FormulaireMasque!ContrôleDonnee" comme paramètre du critère de sélection.
bonne suite
0