Bonjour
Je souhaiterais que la colonne désignation de l'onglet synthèse se classe par ordre alphabétique.
Avec ta macro ca le fait pas de soucis.
Je souhaite juste cela. Pour le reste je me suis débrouillé. Merci bien.
Par contre avec ta macro, ca réduit également la largeur des colonnes ce que je ne veux pas.
Range("Tableau3").Columns.AutoFit
ActiveWorkbook.Worksheets("Synthèse").ListObjects("Tableau3").Sort.SortFields. _
Clear
ActiveWorkbook.Worksheets("Synthèse").ListObjects("Tableau3").Sort.SortFields. _
Add2 Key:=Range("Tableau3[Désignation]"), SortOn:=xlSortOnValues, Order:= _
xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Synthèse").ListObjects("Tableau3").Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.Apply
Merci bien.