Trier en gardant format

[claudy]

Bonjour à tous,
Un tableau mensuel,
Pour la clareté des données, une ligne sur deux possède une couleur de remplissage différent.
Lorsque je lance la macro suivante, pour faire un tri alpha sur les noms, je me retrouve avec des lignes de même couleur qui se suivent!
Comment trier en gardant mon format une ligne sur deux?

Sub TrierParNoms()
'

Range("B4:AJ53").Select
Selection.Sort Key1:=Range("C4"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=True, Orientation:=xlTopToBottom

End Sub
Merci, A+,
Claudy

 

[Thierry]

Salut Claudy,


Voici ci-joint un fichier Excel Demo qui fait ce dont tu as besoin.
Tu n'auras qu'à adapter ton "sort" dans la macro, dans la partie :

Range("A1").Select
Selection.CurrentRegion.Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, _.....
'en changeant "A1"...


Bon Week End à tout le monde,

@+Thierry

 

[Thierry]

Tiens, il me semblait pourtant que ce fichier Demo, répondait exactement au problème de Claudy....

@+Thierry