Je souhaite utiliser le resultat de ma selection multiple
d'une liste a selection multiple afin d'editer un etat
J'ai utilise cette methode :
Apres selection de mes lignes et clic sur bouton :
If Me.List_Etu.ItemsSelected.Count = 0 Then
Msg "Selectionnez un element de la liste"
Else
For Each VarI In Me!List_Etu.ItemsSelected
If Etu <> "" Then Etu = Etu & " OR "
Etu = Etu & "[Cod_Etu]=" & _
Me!List_Etu.ItemData(VarI)
Next VarI
End If
DoCmd.OpenReport "Select_Etu", acPreview, "", Etu
Et j'ai filtre l'etat sur Etu
Cela fonctionne mais au dela d'un certain nombre de lignes
selectionnees j'ai une erreur "Le filtre est probablement
trop long" !! Aaargh Que faire !?!
Merci pour votre aide
Chloe
Chloe5972NoSpam@caramail.com
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour.
tu dois dépasser le nombre maxi de caractères du paramètre qui est de ... je ne sais plus combien. pour éviter ce genre de désagrément, passe par une fonction dans ta réquête. tu trouveras un exemple sur la page : http://access.vba.free.fr/selection_multiple.htm -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Chloe" a écrit dans le message de news: 1e3501c4b51f$5de74df0$
Bonjour a tous
Je souhaite utiliser le resultat de ma selection multiple d'une liste a selection multiple afin d'editer un etat J'ai utilise cette methode : Apres selection de mes lignes et clic sur bouton : If Me.List_Etu.ItemsSelected.Count = 0 Then Msg "Selectionnez un element de la liste" Else For Each VarI In Me!List_Etu.ItemsSelected If Etu <> "" Then Etu = Etu & " OR " Etu = Etu & "[Cod_Etu]=" & _ Me!List_Etu.ItemData(VarI) Next VarI End If DoCmd.OpenReport "Select_Etu", acPreview, "", Etu Et j'ai filtre l'etat sur Etu
Cela fonctionne mais au dela d'un certain nombre de lignes selectionnees j'ai une erreur "Le filtre est probablement trop long" !! Aaargh Que faire !?!
Merci pour votre aide Chloe
Bonjour.
tu dois dépasser le nombre maxi de caractères du paramètre qui est de ... je
ne sais plus combien.
pour éviter ce genre de désagrément, passe par une fonction dans ta réquête.
tu trouveras un exemple sur la page :
http://access.vba.free.fr/selection_multiple.htm
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Chloe" <Chloe5972NoSpam@caramail.com> a écrit dans le message de news:
1e3501c4b51f$5de74df0$a601280a@phx.gbl...
Bonjour a tous
Je souhaite utiliser le resultat de ma selection multiple
d'une liste a selection multiple afin d'editer un etat
J'ai utilise cette methode :
Apres selection de mes lignes et clic sur bouton :
If Me.List_Etu.ItemsSelected.Count = 0 Then
Msg "Selectionnez un element de la liste"
Else
For Each VarI In Me!List_Etu.ItemsSelected
If Etu <> "" Then Etu = Etu & " OR "
Etu = Etu & "[Cod_Etu]=" & _
Me!List_Etu.ItemData(VarI)
Next VarI
End If
DoCmd.OpenReport "Select_Etu", acPreview, "", Etu
Et j'ai filtre l'etat sur Etu
Cela fonctionne mais au dela d'un certain nombre de lignes
selectionnees j'ai une erreur "Le filtre est probablement
trop long" !! Aaargh Que faire !?!
Merci pour votre aide
Chloe
Chloe5972NoSpam@caramail.com
tu dois dépasser le nombre maxi de caractères du paramètre qui est de ... je ne sais plus combien. pour éviter ce genre de désagrément, passe par une fonction dans ta réquête. tu trouveras un exemple sur la page : http://access.vba.free.fr/selection_multiple.htm -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Chloe" a écrit dans le message de news: 1e3501c4b51f$5de74df0$
Bonjour a tous
Je souhaite utiliser le resultat de ma selection multiple d'une liste a selection multiple afin d'editer un etat J'ai utilise cette methode : Apres selection de mes lignes et clic sur bouton : If Me.List_Etu.ItemsSelected.Count = 0 Then Msg "Selectionnez un element de la liste" Else For Each VarI In Me!List_Etu.ItemsSelected If Etu <> "" Then Etu = Etu & " OR " Etu = Etu & "[Cod_Etu]=" & _ Me!List_Etu.ItemData(VarI) Next VarI End If DoCmd.OpenReport "Select_Etu", acPreview, "", Etu Et j'ai filtre l'etat sur Etu
Cela fonctionne mais au dela d'un certain nombre de lignes selectionnees j'ai une erreur "Le filtre est probablement trop long" !! Aaargh Que faire !?!
Merci pour votre aide Chloe
Salut Raymond
Effectivement j'ai essaye ta methode mais je n'y arrive pas J'ai fait bien tout comme il fallait (m'enfin je crois) Et paf erreur sur If CStr(ParameterValue) = Ctl.ItemData(varItm) Then... de Public Function CompareList "Erreur d'execution94 Utilisation incirrecte de null !" Gasp !!! Ou est ce que je me plante?!
Merci pour tout Claude
-----Message d'origine----- Bonjour.
tu dois dépasser le nombre maxi de caractères du paramètre qui est de ... je
ne sais plus combien. pour éviter ce genre de désagrément, passe par une fonction dans ta réquête.
tu trouveras un exemple sur la page : http://access.vba.free.fr/selection_multiple.htm -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Chloe" a écrit dans le message de news:
1e3501c4b51f$5de74df0$
Bonjour a tous
Je souhaite utiliser le resultat de ma selection multiple
d'une liste a selection multiple afin d'editer un etat J'ai utilise cette methode : Apres selection de mes lignes et clic sur bouton : If Me.List_Etu.ItemsSelected.Count = 0 Then Msg "Selectionnez un element de la liste" Else For Each VarI In Me!List_Etu.ItemsSelected If Etu <> "" Then Etu = Etu & " OR " Etu = Etu & "[Cod_Etu]=" & _ Me!List_Etu.ItemData(VarI) Next VarI End If DoCmd.OpenReport "Select_Etu", acPreview, "", Etu Et j'ai filtre l'etat sur Etu
Cela fonctionne mais au dela d'un certain nombre de lignes
selectionnees j'ai une erreur "Le filtre est probablement
trop long" !! Aaargh Que faire !?!
Merci pour votre aide Chloe
.
Salut Raymond
Effectivement j'ai essaye ta methode mais je n'y arrive
pas
J'ai fait bien tout comme il fallait (m'enfin je crois)
Et paf erreur sur
If CStr(ParameterValue) = Ctl.ItemData(varItm) Then...
de Public Function CompareList
"Erreur d'execution94 Utilisation incirrecte de null !"
Gasp !!!
Ou est ce que je me plante?!
Merci pour tout
Claude
-----Message d'origine-----
Bonjour.
tu dois dépasser le nombre maxi de caractères du
paramètre qui est de ... je
ne sais plus combien.
pour éviter ce genre de désagrément, passe par une
fonction dans ta réquête.
tu trouveras un exemple sur la page :
http://access.vba.free.fr/selection_multiple.htm
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Chloe" <Chloe5972NoSpam@caramail.com> a écrit dans le
message de news:
1e3501c4b51f$5de74df0$a601280a@phx.gbl...
Bonjour a tous
Je souhaite utiliser le resultat de ma selection
multiple
d'une liste a selection multiple afin d'editer un etat
J'ai utilise cette methode :
Apres selection de mes lignes et clic sur bouton :
If Me.List_Etu.ItemsSelected.Count = 0 Then
Msg "Selectionnez un element de la liste"
Else
For Each VarI In Me!List_Etu.ItemsSelected
If Etu <> "" Then Etu = Etu & " OR "
Etu = Etu & "[Cod_Etu]=" & _
Me!List_Etu.ItemData(VarI)
Next VarI
End If
DoCmd.OpenReport "Select_Etu", acPreview, "", Etu
Et j'ai filtre l'etat sur Etu
Cela fonctionne mais au dela d'un certain nombre de
lignes
selectionnees j'ai une erreur "Le filtre est
probablement
trop long" !! Aaargh Que faire !?!
Merci pour votre aide
Chloe
Chloe5972NoSpam@caramail.com
Effectivement j'ai essaye ta methode mais je n'y arrive pas J'ai fait bien tout comme il fallait (m'enfin je crois) Et paf erreur sur If CStr(ParameterValue) = Ctl.ItemData(varItm) Then... de Public Function CompareList "Erreur d'execution94 Utilisation incirrecte de null !" Gasp !!! Ou est ce que je me plante?!
Merci pour tout Claude
-----Message d'origine----- Bonjour.
tu dois dépasser le nombre maxi de caractères du paramètre qui est de ... je
ne sais plus combien. pour éviter ce genre de désagrément, passe par une fonction dans ta réquête.
tu trouveras un exemple sur la page : http://access.vba.free.fr/selection_multiple.htm -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Chloe" a écrit dans le message de news:
1e3501c4b51f$5de74df0$
Bonjour a tous
Je souhaite utiliser le resultat de ma selection multiple
d'une liste a selection multiple afin d'editer un etat J'ai utilise cette methode : Apres selection de mes lignes et clic sur bouton : If Me.List_Etu.ItemsSelected.Count = 0 Then Msg "Selectionnez un element de la liste" Else For Each VarI In Me!List_Etu.ItemsSelected If Etu <> "" Then Etu = Etu & " OR " Etu = Etu & "[Cod_Etu]=" & _ Me!List_Etu.ItemData(VarI) Next VarI End If DoCmd.OpenReport "Select_Etu", acPreview, "", Etu Et j'ai filtre l'etat sur Etu
Cela fonctionne mais au dela d'un certain nombre de lignes
selectionnees j'ai une erreur "Le filtre est probablement
trop long" !! Aaargh Que faire !?!
Merci pour votre aide Chloe
.
Raymond [mvp]
il y a une valeur nulle dans un des deux paramètres. à mon avis c'est ParameterValue qui a la valeur Null. regarde par un arrêt sur chaque ligne où se trouve la valeur nulle. place une fonction Nz sur la paramètre qui est null. si c'est ParameterValue qui est null, vérifie pourquoi cette valeur est nulle et non 0 ou espace par exemple. il faudra me dire où pour que je corrige ma fonction, pour rajouter un test supplémentaire.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news: 1a1b01c4b52a$8da59730$ Salut Raymond
Effectivement j'ai essaye ta methode mais je n'y arrive pas J'ai fait bien tout comme il fallait (m'enfin je crois) Et paf erreur sur If CStr(ParameterValue) = Ctl.ItemData(varItm) Then... de Public Function CompareList "Erreur d'execution94 Utilisation incirrecte de null !" Gasp !!! Ou est ce que je me plante?!
Merci pour tout Claude
il y a une valeur nulle dans un des deux paramètres.
à mon avis c'est ParameterValue qui a la valeur Null.
regarde par un arrêt sur chaque ligne où se trouve la valeur nulle.
place une fonction Nz sur la paramètre qui est null. si c'est ParameterValue
qui est null, vérifie pourquoi cette valeur est nulle et non 0 ou espace par
exemple.
il faudra me dire où pour que je corrige ma fonction, pour rajouter un test
supplémentaire.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le message de news:
1a1b01c4b52a$8da59730$a401280a@phx.gbl...
Salut Raymond
Effectivement j'ai essaye ta methode mais je n'y arrive
pas
J'ai fait bien tout comme il fallait (m'enfin je crois)
Et paf erreur sur
If CStr(ParameterValue) = Ctl.ItemData(varItm) Then...
de Public Function CompareList
"Erreur d'execution94 Utilisation incirrecte de null !"
Gasp !!!
Ou est ce que je me plante?!
il y a une valeur nulle dans un des deux paramètres. à mon avis c'est ParameterValue qui a la valeur Null. regarde par un arrêt sur chaque ligne où se trouve la valeur nulle. place une fonction Nz sur la paramètre qui est null. si c'est ParameterValue qui est null, vérifie pourquoi cette valeur est nulle et non 0 ou espace par exemple. il faudra me dire où pour que je corrige ma fonction, pour rajouter un test supplémentaire.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news: 1a1b01c4b52a$8da59730$ Salut Raymond
Effectivement j'ai essaye ta methode mais je n'y arrive pas J'ai fait bien tout comme il fallait (m'enfin je crois) Et paf erreur sur If CStr(ParameterValue) = Ctl.ItemData(varItm) Then... de Public Function CompareList "Erreur d'execution94 Utilisation incirrecte de null !" Gasp !!! Ou est ce que je me plante?!
