Ramener le nombre maximum d'éléments d'une listbox

Salut,

Bon, encore un problème qui semble pourtant simple.

J'ai ce code :

Code:

---

1 2 3 4 5 6 7 8

intMaxI = Me.cboListScreen.ListCount - 1   For intI = 0 To intMaxI If aListFields(intI).strFieldName = strFieldName Then Exit For End If   Next intI

---

cboListScreen est une listbox.

Le problème étant que intMaxI me retourne toujours le nombre d'éléments jusqu'à la sélection de l'item.

Or, je voudrais que intMaxI me ramène le nombre total d'éléments de la listbox. Je croyais que .ListCount me permettait de faire ça !!!

Comment faire ?

Merci par avance.