tri par couleur

[guygnolle]

Bonjour,🙂
j'ai mis des info sur un tableur excel avec des lignes (500 à ce jour) et colonnes 26 pour l'instant (suffisant). La plupart des lignes sont blanches, mais j'utilise également 4 couleurs pour defirnir des état différents
Toutes les colonnes ont un filtre de tri, je voudrai pouvoir trier les lignes par couleur..... et revenir en arrière en retriant sur colonne C. J'ai fouillé un peu...mais je n'ai rien trouvé 😡
merci de votre aide

 

[guygnolle]

Re : tri par couleur

up! thanks

 

[Efgé]

Re : tri par couleur

Bonjour guygnolle, le fil,
Je me permet de faire une proposition: Toutes les cellules de la colonne C ne sont pas remplies, donc il faut s'appuyer sur la colonne A.

remplace

For Each c In Range("c2", [C65000].End(xlUp))

par

For Each c In Range("C2:C" & Range("A65000").End(xlUp).Row)

Cordialement

 

[guygnolle]

Re : tri par couleur

Bonjour Efgé, le fil

Oui tres juste, c'est exactement ce que j'ai vu et corrigé, je voulais le poster quand je t'ai lus.
merci à vous tous
cordialement

 

[guygnolle]

Re : tri par couleur

Bonjour Efgé, bonjour le fil,
Voilà mon petit soucis, dès que je remets l'entete, celle ci se vois noyer dans le tri
Comment faire pour qu'elle ne le soit pas
D'avance merci

 

[guygnolle]

Re : tri par couleur

Oups le fichier...🙂

 

[Efgé]

Re : tri par couleur

Bonjour guygnolle,
Ton fichier modifié (le problème venait je pense de l'utilisation de CurrentRegion)
Cordialement

 

[guygnolle]

Re : tri par couleur

Salut Efgé,

C'est presque parfait, j'ai encore étendu la sélection car la colonne K n'était pas prise en compte

Range("A2:K" & [B65000].End(xlUp).Row).Sort , Key1:=[A2]
=>
Range("A2:AA" & [B65000].End(xlUp).Row).Sort , Key1:=[A2]

et là ça marche
merci encore🙂

 

[guygnolle]

Re : tri par couleur

Bonjour Efgé, bonjour le fll,
Le tri par couleur fonctionne bien, mais j'ai un soucis avec le tri de la colonnes D, bizarrement le classement n'est pas croissant, il l'est lorsqu'il y a la meme couleur de cellule.....ou lorsque le chiffre contenu est de la même couleur
voici la macro:
range("A3:AA"& [A65000].End(xlUp).Row).Sort , Key1:=[d3]
end Sub

 

[Efgé]

Re : tri par couleur

Bonjour guygnolle, le fil
Je ne comprend pas pourquois tu utilise Key1:=[d3], alors que ton exemple se base sur d2, enfin bref...
Essaie de changer

range("A3:AA"& [A65000].End(xlUp).Row).Sort , Key1:=[d3]

par

Range("A2:K" & [A65000].End(xlUp).Row).Sort , Key1:=[d2][COLOR=red][B], Order1:=xlAscending[/B][/COLOR]

Après d2 ou d3 c'est à toi de voir 😉
Cordialement

 

[guygnolle]

Re : tri par couleur

Salut Efgé,🙂
Oui, "d3" car mon entête fait deux lignes.
Malgres avoir corrigé le tri, j'ai toujours encore des portions "non" classées de la colonnes "D", est-ce du au fait que les nombres sont de différentes couleurs?, je ne peux pas t'envoyer le tableau complet car la limite est 50k, le mien fait 200k😡
a plus

 

[Efgé]

Re : tri par couleur

Re
Envoi nous juste une feuille avec ta colonne D (et les en têtes de ton tableau)
Cordialement

 

[guygnolle]

Re : tri par couleur

Re:
dans le classeur 1 j'ai mis la colonne "D" triée suivant la macro

 

[guygnolle]

Re : tri par couleur

dans le second classeur, je l'ai triée par couleur...
a plus

 

[guygnolle]

Re : tri par couleur

Héhé,
boulet que je suis, mes nombres en "D" était du texte et non des nombres....
j'ai corrigé et maintenant ça marche

merci à vous tous sur ce forum
🙂🙂🙂🙂🙂🙂🙂