Aide sur un tri depuis une liste perso

[hypo78]

Bonjour

je dois faire un tri selon 2 critères :
- le premier est ce que la personne est volontaire pour la mission?
- le second d'après une liste perso (outils/options/liste perso).

Si je fais le tri selon le seul critère de ma liste perso çà fonctionne mais pas si je le fais comme souhaité.

Est ce que le tri selon une liste perso ne peut être associé à d'autres critères?

Si çà fonctionne je le mets sous forme d'une macro pour l'utilisateur après un p'tit clic sur le bouton trier.

Merci d'avance.

 

[hypo78]

Re : Aide sur un tri depuis une liste perso

Re,

j'ai trouvé une solution, dans ma macro je lui fait faire un premier tri selon ma liste puis un second tri depuis le critère volontaire.

Pas de tri multicritère mais 2 tris consécutifs.

Voilà

 

[hypo78]

Re : Aide sur un tri depuis une liste perso

Re,

le fichier est utilisé sur 2PC en réseau, et le tri ne fonctionne pas sur les 2. Quand on jette un oeil sur la macro, je pense que la ligne qui fait référence à l'option (liste perso) est "ordercustom".

Il y a -t-il une solution si les listes ne sont pas dans le même ordre sur les 2 PC?

 Sub rad_2()

   Range("F15:I53").Select
    Selection.Sort Key1:=Range("F15"), Order1:=xlAscending, Header:=xlNo, _
        OrderCustom:=6, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    Selection.Sort Key1:=Range("H15"), Order1:=xlAscending, Header:=xlNo, _
        OrderCustom:=6, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    Range("F15").Select
End Sub

 

[Cousinhub]

Re : Aide sur un tri depuis une liste perso

bonjour,

J'avais fait, il y a quelque temps, un petit fichier, permettant un tri selon une liste personnelle.

Je te le fais suivre, tu pourras sans doute t'en inspirer.

Bon courage

 

[hypo78]

Re : Aide sur un tri depuis une liste perso

Re,

Merci je vais regarder ça dès que je suis sur mon PC.
Cordialement.