Bonjour à tous,

J'ai une ListBox à choix multiple qui contient les 4 Valeurs : "France", "USA", "Angletterre" et "Italie".

J'aimerai pouvoir effectuer un test dans une macro du type :
SI France est selectionnée alors Action 1
Si USA est selectionnée alors Action 2
...

Pour cela j'ai utilisé la collections SelectedObjectCollection, et la méthode contains :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
Dim AreaSelected As SelectedObjectCollection
AreaSelected = AreaList.SelectedItems
returnValue = AreaSelected.Contains("USA")
If returnValue Then Action 1 
End if
Le problème c'est dès la définition de la collection AreaSelected, j'ai un message d'erreur du type "User defined type non defined".

Quelqu'un aurait-il une idée du problème ?