J'aimerais savoir comment faire pour afficher ma variable=20
sans que le code ne cause d'erreur. Dans ce cas ci, un de=20
mes ItemData est "Soci=E9t=E9s d'assurance" L'apostrope cause=20
un probl=E8me car le code le consid=E8re comme une guillement=20
simple. Voici le r=E9sultat de ma variable:=20
-- à+ Arnaud -------------------------------------------------- *Avant toute chose* : http://users.skynet.be/mpfa/ Access Memorandum - http://memoaccess.free.fr /Réponses souhaitées sur ce forum, merci/ --------------------------------------------------
Gringo : | Surement une p'tit facile ! | | J'aimerais savoir comment faire pour afficher ma variable | sans que le code ne cause d'erreur. Dans ce cas ci, un de | mes ItemData est "Sociétés d'assurance" L'apostrope cause | un problème car le code le considère comme une guillement | simple. Voici le résultat de ma variable: | | [MEMBRE=-1]AND ([Sous-Secteur]= 'Sociétés d'assurance') | | Voici le code pour obtenir la variable: | StFiltre= [MEMBRE=-1] | | Set ctl = Me.lstSousSecteurs | For Each varItm In ctl.ItemsSelected | stFiltre = stFiltre & "[Sous-secteur]='" & | ctl.ItemData(varItm) & "' OR " | stValeur = stValeur & ctl.ItemData(varItm) | & ", " | Next varItm | stFiltre = Left(stFiltre, Len(stFiltre) - 3) | stFiltre = stFiltre & ")" | stValeur = Left(stValeur, Len(stValeur) - 2)
--
à+
Arnaud
--------------------------------------------------
*Avant toute chose* : http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
/Réponses souhaitées sur ce forum, merci/
--------------------------------------------------
Gringo <Gringo@hotmail.cm> :
| Surement une p'tit facile !
|
| J'aimerais savoir comment faire pour afficher ma variable
| sans que le code ne cause d'erreur. Dans ce cas ci, un de
| mes ItemData est "Sociétés d'assurance" L'apostrope cause
| un problème car le code le considère comme une guillement
| simple. Voici le résultat de ma variable:
|
| [MEMBRE=-1]AND ([Sous-Secteur]= 'Sociétés d'assurance')
|
| Voici le code pour obtenir la variable:
| StFiltre= [MEMBRE=-1]
|
| Set ctl = Me.lstSousSecteurs
| For Each varItm In ctl.ItemsSelected
| stFiltre = stFiltre & "[Sous-secteur]='" &
| ctl.ItemData(varItm) & "' OR "
| stValeur = stValeur & ctl.ItemData(varItm)
| & ", "
| Next varItm
| stFiltre = Left(stFiltre, Len(stFiltre) - 3)
| stFiltre = stFiltre & ")"
| stValeur = Left(stValeur, Len(stValeur) - 2)
-- à+ Arnaud -------------------------------------------------- *Avant toute chose* : http://users.skynet.be/mpfa/ Access Memorandum - http://memoaccess.free.fr /Réponses souhaitées sur ce forum, merci/ --------------------------------------------------
Gringo : | Surement une p'tit facile ! | | J'aimerais savoir comment faire pour afficher ma variable | sans que le code ne cause d'erreur. Dans ce cas ci, un de | mes ItemData est "Sociétés d'assurance" L'apostrope cause | un problème car le code le considère comme une guillement | simple. Voici le résultat de ma variable: | | [MEMBRE=-1]AND ([Sous-Secteur]= 'Sociétés d'assurance') | | Voici le code pour obtenir la variable: | StFiltre= [MEMBRE=-1] | | Set ctl = Me.lstSousSecteurs | For Each varItm In ctl.ItemsSelected | stFiltre = stFiltre & "[Sous-secteur]='" & | ctl.ItemData(varItm) & "' OR " | stValeur = stValeur & ctl.ItemData(varItm) | & ", " | Next varItm | stFiltre = Left(stFiltre, Len(stFiltre) - 3) | stFiltre = stFiltre & ")" | stValeur = Left(stValeur, Len(stValeur) - 2)