Bonjour,
a ma connaissance lorsque tu utilises le tri sur un objet de type table, le tri s'applique à toute la table, tu n'as pas la possibilité de choisir les lignes du tableau sur lesquelles doit s'appliquer. Une manière de contourner ce problème est de ne pas faire référence au tableau, mais directement aux plages de cellules excel.
a = Split(ActiveWorkbook.Worksheets("Sheet1").ListObjects("table4").Range.Address, "$") ' on détermine l'adresse des cellules de la plage du tableau a(1)=première colonne, a(2)=première ligne, suivie de ":", a(3)=dernière colonne, a(4)=dernière ligne
'on définit la plage pour le tri
a(2) = "10:" 'la première ligne commence à 10
r = Join(a, "$") 'r =plage
Range(r).Sort key1:=Range(a(1) & "1"), order1:=xlDescending, Header:=no 'tri