Comme l'a très justement dit Starec la sélection multiple n'existe pas avec une zone liste déroulante.
On peut par contre programmé un effet similaire, ça reste du bricolage.
Utiliser l'événement Après MAJ pour détecter le choix (normal)
Proposer via un msgbox de continuer par une autre sélection ou non.
Exemple :
En entête mettre une variable globale string pour stocker les sélections :
Dim strSelectValues as string
Dans le afterupdate :
1 2 3
| If msgbox("souhaitez-vous faire une autre sélection ?",vbyesno,"Autre choix") = vbyes then
If len(strSelectValues)>0 then strSelectValue=strSelectValue & "," & me.maliste
endif |
Composer ensuite la multisélection :
If len(strSelectValue)=0 then strSelectValue="IN(" & strSelectValue & ")"
Voilà les grandes lignes du process, il faut adpater à ton cas, si les valeurs sont du texte, si tu veux prévoir une annulation des choix...
Cordialement,
Partager