OVH Cloud OVH Cloud

Macro de tri sur les titres d'un tableau

2 réponses
Avatar
Domi
Bonsoir,
voici une macro faite avec l'enregistreur sur un tableau dont la ligne de
titres est la 6.
Application.Goto Reference:="base"
Selection.Sort Key1:=Range("C7"), Order1:=xlAscending, Key2:=Range("D7")
_
, Order2:=xlAscending, Key3:=Range("B7"), Order3:=xlAscending,
Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False,
Orientation:=xlTopToBottom

Est-il possible de faire ce genre de macro en triant sur les noms qui
figurent dans la ligne de titre
"Nom" (C6) puis "Prénom" (D6) et "Age" (B6) par exemple
Le but serait de permettre de ne pas avoir à modifier cette macro de tri si
je rajoute une colonne au début par exemple.

Merci
Domi

2 réponses

Avatar
isabelle
bonjour Domi,

il faut nommer les cellules et se servir de ces noms,
la sélection doit contenir la ligne de titre et Header:= xlYes

Selection.Sort Key1:=Range("Nom"), Order1:=xlAscending, _
Key2:=Range("Prenom"), Order2:=xlAscending, _
Key3:=Range("Age"), Order3:=xlAscending, _
Header:= xlYes, OrderCustom:=1, MatchCase:úlse, _
Orientation:=xlTopToBottom

isabelle


Bonsoir,
voici une macro faite avec l'enregistreur sur un tableau dont la ligne de
titres est la 6.
Application.Goto Reference:="base"
Selection.Sort Key1:=Range("C7"), Order1:=xlAscending, Key2:=Range("D7")
_
, Order2:=xlAscending, Key3:=Range("B7"), Order3:=xlAscending,
Header:= _
xlGuess, OrderCustom:=1, MatchCase:úlse,
Orientation:=xlTopToBottom

Est-il possible de faire ce genre de macro en triant sur les noms qui
figurent dans la ligne de titre
"Nom" (C6) puis "Prénom" (D6) et "Age" (B6) par exemple
Le but serait de permettre de ne pas avoir à modifier cette macro de tri si
je rajoute une colonne au début par exemple.

Merci
Domi


Avatar
Domi
Merci beaucoup ;o)
Domi

"isabelle" a écrit dans le message de
news:
bonjour Domi,

il faut nommer les cellules et se servir de ces noms,
la sélection doit contenir la ligne de titre et Header:= xlYes

Selection.Sort Key1:=Range("Nom"), Order1:=xlAscending, _
Key2:=Range("Prenom"), Order2:=xlAscending, _
Key3:=Range("Age"), Order3:=xlAscending, _
Header:= xlYes, OrderCustom:=1, MatchCase:úlse, _
Orientation:=xlTopToBottom

isabelle


Bonsoir,
voici une macro faite avec l'enregistreur sur un tableau dont la ligne
de


titres est la 6.
Application.Goto Reference:="base"
Selection.Sort Key1:=Range("C7"), Order1:=xlAscending,
Key2:=Range("D7")


_
, Order2:=xlAscending, Key3:=Range("B7"), Order3:=xlAscending,
Header:= _
xlGuess, OrderCustom:=1, MatchCase:úlse,
Orientation:=xlTopToBottom

Est-il possible de faire ce genre de macro en triant sur les noms qui
figurent dans la ligne de titre
"Nom" (C6) puis "Prénom" (D6) et "Age" (B6) par exemple
Le but serait de permettre de ne pas avoir à modifier cette macro de tri
si


je rajoute une colonne au début par exemple.

Merci
Domi