// Lignes sélectionnées dans une liste multi-sélections
i est un entier = 1
LigneSelectionnee est un entier
LigneSelectionnee = ListeSelect(Liste1,1)
TANTQUE LigneSelectionnee <> -1
Trace("La ligne n°"+ LigneSelectionnee +" est sélectionnée, je dois donc l'enregistrer")
// ...
i++
LigneSelectionnee = ListeSelect(Liste1,i)
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=3345&post_id=14209