Bonjour.
Alors, est-ce bon ?
Info: la nouvelle version de SujCBxFiltré marche maintenant aussi. L'erreur venait d'une Function IlEnResteFiltrés qu'elle utilise. Celle ci fait If TConsult(L) Then R = R + 1: TLong(R) = L, TConsult étant une liste de Boolean. Je savais pertinemment que l'indice L pouvait être en dehors des limites, et je faisais donc On Error Resume Next devant pour que ça ne plante pas. Mais je ne m'attendais vraiment pas à ce que l'exécution se poursuive alors, à tort, comme si ç'avait été True…
Si vous avez besoin d'autres aménagements j'en profiterai pour joindre ça avec le dispositif corrigé.