Bonsoir le forum,
Le code testé sur 40 lignes fonctionne sans encombre, mais rame sans fin avec 1700 lignes
Quelqu'un pourrait-il m'indiquer une bonne façon d'alimenter cette ListBox triée alphabétiquement :
Private Sub UserForm_Initialize()
Dim wsBD As Worksheet, lastCell As Integer, lastRow...