Requête et fonction
rvig
Messages postés
1
Statut
Membre
-
Tessel75 -
Tessel75 -
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.
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 -
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
