Access - Fonction
Résolu/Fermé
CLABEN
Messages postés
17
Date d'inscription
mardi 11 décembre 2007
Statut
Membre
Dernière intervention
21 janvier 2014
-
16 déc. 2009 à 10:05
Samygale Messages postés 45 Date d'inscription jeudi 10 décembre 2009 Statut Membre Dernière intervention 18 décembre 2009 - 17 déc. 2009 à 10:06
Samygale Messages postés 45 Date d'inscription jeudi 10 décembre 2009 Statut Membre Dernière intervention 18 décembre 2009 - 17 déc. 2009 à 10:06
A voir également:
- Access - Fonction
- Fonction si et - Guide
- Fonction somme excel - Guide
- Fonction moyenne excel - Guide
- Fonction trier excel - Guide
- Fonction ms dos non valide - Forum Windows 8 / 8.1
5 réponses
Samygale
Messages postés
45
Date d'inscription
jeudi 10 décembre 2009
Statut
Membre
Dernière intervention
18 décembre 2009
1
16 déc. 2009 à 14:49
16 déc. 2009 à 14:49
Bonjour,
Les listes dont tu parles permettent simplement de savoir dans quelle section de code ton curseur se trouve ("Déclarations" quand le curseur est au début du module...).
Cette fonction F_Filtrer est appelée par un bouton ?
Les listes dont tu parles permettent simplement de savoir dans quelle section de code ton curseur se trouve ("Déclarations" quand le curseur est au début du module...).
Cette fonction F_Filtrer est appelée par un bouton ?
Samygale
Messages postés
45
Date d'inscription
jeudi 10 décembre 2009
Statut
Membre
Dernière intervention
18 décembre 2009
1
16 déc. 2009 à 15:28
16 déc. 2009 à 15:28
ok peux tu stp poster ton code ?
Voici le code:
Function F_Filtrer()
Filtre1 = "[Lettre] Like ""*"" & forms![F_Fiche_Selection].[CXPROP] & ""*"""
Filtre2 = "[Entreprise] Like ""*"" & forms![F_Fiche_Selection].[CXENTMAT] & ""*"""
Filtre3 = "[Designation] Like ""*"" & forms![F_Fiche_Selection].[CXDES] & ""*"""
DoCmd.OpenForm "F_Fiche_Selection_Resultat", acNormal, "", Filtre1 & "And" & Filtre2 & "And" & Filtre3, , acNormal
End Function
Function F_Filtrer()
Filtre1 = "[Lettre] Like ""*"" & forms![F_Fiche_Selection].[CXPROP] & ""*"""
Filtre2 = "[Entreprise] Like ""*"" & forms![F_Fiche_Selection].[CXENTMAT] & ""*"""
Filtre3 = "[Designation] Like ""*"" & forms![F_Fiche_Selection].[CXDES] & ""*"""
DoCmd.OpenForm "F_Fiche_Selection_Resultat", acNormal, "", Filtre1 & "And" & Filtre2 & "And" & Filtre3, , acNormal
End Function
Samygale
Messages postés
45
Date d'inscription
jeudi 10 décembre 2009
Statut
Membre
Dernière intervention
18 décembre 2009
1
16 déc. 2009 à 15:49
16 déc. 2009 à 15:49
Oki, on peut commencer par la syntaxe :
Filtre1 = "[Lettre] Like ""*"" & forms![F_Fiche_Selection].[CXPROP] & ""*"""
Filtre1 = "[Lettre] Like '*" & forms![F_Fiche_Selection].[CXPROP] & "'*"
==> [Lettre] Like '*VALEUR*'
Quelle ligne te renvoie une erreur ?
Filtre1 = "[Lettre] Like ""*"" & forms![F_Fiche_Selection].[CXPROP] & ""*"""
Filtre1 = "[Lettre] Like '*" & forms![F_Fiche_Selection].[CXPROP] & "'*"
==> [Lettre] Like '*VALEUR*'
Quelle ligne te renvoie une erreur ?
Samygale
Messages postés
45
Date d'inscription
jeudi 10 décembre 2009
Statut
Membre
Dernière intervention
18 décembre 2009
1
17 déc. 2009 à 09:47
17 déc. 2009 à 09:47
Re,
Ok, y'a-t-il dans tes données de filtre des caractères ' ou " par hasard ?
Ok, y'a-t-il dans tes données de filtre des caractères ' ou " par hasard ?
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Samygale
Messages postés
45
Date d'inscription
jeudi 10 décembre 2009
Statut
Membre
Dernière intervention
18 décembre 2009
1
17 déc. 2009 à 10:06
17 déc. 2009 à 10:06
ah ok, ben j'étais pas dedans du tout là :)
16 déc. 2009 à 15:23
- ok pour la position du curseur
- depuis un bouton placé sur le formulaire, j'active une macro pour
a) Ouvrir Formulaire
b) ExécuterCode ... Nom fonction: F_Filtrer()
Le plus étonnant c'est que la commande à fonctionné 3 ou 4 fois !!!