[FAQ] Cas particulier de ListBox.RemoveItem

[spaiku]

Bonjour,

c'est ma première contribution. Si je ne respecte pas certaines règles, merci de m'en faire la remarque. J'ai rencontré le cas décrit ci-dessous dans une fonction destinée à trier une ListBox. J'aimerais également proposer cette fonction. Je fais un thread à part ?

Le cas particulier, rencontré sous Access 2003 SP2, est le suivant :
- La ListBox est multicolonne
- Je veux supprimer la première ligne (Index = 0)
- La première colonne est vide (donc le RowSource commence par : ";Valeur1...")

Dans ce cas, le

MaListe.RemoveItem 0

supprime la première ligne, mais aussi la première valeur de la deuxième ligne, et décale donc le reste du tableau.

Remarques :
1) le cas se produit aussi avec une ListBox monocolonne, ce qui revient à supprimer deux lignes.
2) Si je veux supprimer une autre ligne que la première, pas de problème, même si la première colonne est vide.
3) Si la première colonne de la première ligne (ListBox.Column(0, 0)) n'est pas vide, pas de problème.

Le problème est donc facilement résolu avec un

If Left(MaListe.RowSource, 1) = ";" Then MaListe.RowSource = " " & MaListe.RowSource