Con porcentaje,
List1.ListIndex, lo multiplicas por 100 y luego lo divides con List1.ListCount,
Esto te da el value para el progress bar
Cuidado con los valores al limite..

__________________
---------------------
Ácido, pero vitamínico.

Maipú- Chile