Bonjour,
J'ai un tableau avec plusieurs comparatifs pour chaque fois les même objets de comparaison (dans la colonne A) et je souhaiterais pouvoir sélectionner/trier seulement les objets qui m'intéresse, avec une seule manipulation et qu'ils apparaissent dans chaque bloc de comparaison (dans mon tableau d'origine il y a une vingtaine d'objets et c'est fastidieux d'aller chaque fois trier chaque bloc).
Merci d'avance !
C.
Une p'tite macro associée au bouton orange. La macro est dans module1.
VB:
Sub TrierTous()
Dim lsto
For Each lsto In Sheets("Feuil1").ListObjects
With lsto.Range
.Sort key1:=.Range("a1"), order1:=xlAscending, Header:=xlYes
End With
Next lsto
MsgBox ("Tri des tableaux selon colonne A terminé")
End Sub
Une p'tite macro associée au bouton orange. La macro est dans module1.
VB:
Sub TrierTous()
Dim lsto
For Each lsto In Sheets("Feuil1").ListObjects
With lsto.Range
.Sort key1:=.Range("a1"), order1:=xlAscending, Header:=xlYes
End With
Next lsto
MsgBox ("Tri des tableaux selon colonne A terminé")
End Sub