Rebonsoir à tous,
Marrabeth, toujours des PB avec les with, j'ai rajouté la commande clear car je ne sais pas si elle affiche des données à partir d'un autre contrôle.... J'espère que ton CellBase est bien défini sur ta feuille de calcul
Je pense que le offset ne doit pas se faire avec le N mais avec un entier fixe à moins que suivant le Nb de salariés la valeur que tuveux récupérer n'est pas sur la même ligne....
Liste = Array()
NbSalaries = Sheets("salariés").Range("I2").Value
listesalaries.clear
redim Liste(0 to NbSalaries)
If NbSalaries > 0 Then
For N = 0 To NbSalaries - 1
Liste(N ) = Sheets("salariés").Range(CellBase).Offset(N, 0).Value
Next N
'Tri_Bulle (Liste)
'''For N = 1 To NbSalaries
ListeSalaries.List Liste()
'''Next
End If
''''End With
Je te conseille fortement ce lien
Musée du forum où tu auras la solution pour ton PB de tri, en plus avec des démos bien détaillées au niveau du code et de leur application, mais aussi dans la déclaration des variables qui est un régal pour apprendre VBA quand on a une certaine technique de programmation classique ....
A+++