'Ajouter les valeurs sélectionnées à la Textbox "Text_mentions_de_danger_H_EUH" du formulaire "Label"
For Each ItemData In Me.List_mentions_de_danger_H_EUH.ItemsSelected
Forms![Label]![Text_mentions_de_danger_H_EUH].SetFocus
Forms![Label]![Text_mentions_de_danger_H_EUH].Text = Forms![Label]![Text_mentions_de_danger_H_EUH].Text & List_mentions_de_danger_H_EUH.Column(0, ItemData) & "-"
Next ItemData