Trier lignes ensembles
Résolu
Hucksterag10
Messages postés
2
Statut
Membre
-
Hucksterag10 Messages postés 2 Statut Membre -
Hucksterag10 Messages postés 2 Statut Membre -
Bonjour,
J'ai un peu cherché sur le net et j'ai essayé de composé une macro avec plusieurs fractions mais je pense que je ne m'y prends pas bien, voila en fait je souhaiterai trier des lignes par ordre de grandeur croissante, mais ma feuille se compose toujours de 4 lignes, et elles vont ensembles ( tout en haut les grandeurs, celle du dessous les unités et les 2 dernières des valeurs ) cependant quand je tri ligne par ligne il n'y a plus rien qui correspond.
Ensuite, second problème : le nombre de colonne est variable selon mes fichier donc je souhaiterai avoir un code qui permettrai de sélectionner automatiquement les cellules (ou le nombre de colonne) car je peux avoir 10 colonnes comme 500. Jusque maintenant quand le nombre de colonne n'est pas exactement rentré, la macro s'arrête et bug.
Que faire ?
J'ai un peu cherché sur le net et j'ai essayé de composé une macro avec plusieurs fractions mais je pense que je ne m'y prends pas bien, voila en fait je souhaiterai trier des lignes par ordre de grandeur croissante, mais ma feuille se compose toujours de 4 lignes, et elles vont ensembles ( tout en haut les grandeurs, celle du dessous les unités et les 2 dernières des valeurs ) cependant quand je tri ligne par ligne il n'y a plus rien qui correspond.
Ensuite, second problème : le nombre de colonne est variable selon mes fichier donc je souhaiterai avoir un code qui permettrai de sélectionner automatiquement les cellules (ou le nombre de colonne) car je peux avoir 10 colonnes comme 500. Jusque maintenant quand le nombre de colonne n'est pas exactement rentré, la macro s'arrête et bug.
Que faire ?
A voir également:
- Trier lignes ensembles
- Excel trier par ordre croissant chiffre - Guide
- Logiciel pour trier les photos automatiquement - Guide
- Écrire plusieurs lignes dans une cellule excel mac - Guide
- Excel trier par date ne fonctionne pas ✓ - Forum Excel
- Problème format date et tri sous Excel ✓ - Forum Excel
2 réponses
Bonjour
Difficile d'y voir clair
Peux tu envoyer un bout de fichier au format excel 2003 sur cjoint.com et joindre le lien obtenu à ton prochain message
N'oublies pas d'y ajouter quelques explications et un exemple de résultat attendu
Cdlmnt
Difficile d'y voir clair
Peux tu envoyer un bout de fichier au format excel 2003 sur cjoint.com et joindre le lien obtenu à ton prochain message
N'oublies pas d'y ajouter quelques explications et un exemple de résultat attendu
Cdlmnt
Desolé, j'aurai voulu le faire, mais les données sont confidentielles ....
En fait je m'explique : la premiere ligne contient des grandeurs tel que : Pression / température / temps / vitesse
la ligne du dessous :
bar / °C / h / Kmh
et en dessous
1 / 28 / 2 / 32
le soucis est que si les chiffres ne bougent pas au meme endroit que les valeurs, on change tout ! la j'ai 1 bar de pression / 28 °C de température etc...
Je pense avoir trouvé :
Range("A1").Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Add Key:=Range("A3:J3"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Feuil1").Sort
.SetRange Range("A1:J25")
.Header = xlYes
.MatchCase = False
.Orientation = xlLeftToRight
.SortMethod = xlPinYin
.Apply
est ce que c'est cohérent ?
Cordialement.
En fait je m'explique : la premiere ligne contient des grandeurs tel que : Pression / température / temps / vitesse
la ligne du dessous :
bar / °C / h / Kmh
et en dessous
1 / 28 / 2 / 32
le soucis est que si les chiffres ne bougent pas au meme endroit que les valeurs, on change tout ! la j'ai 1 bar de pression / 28 °C de température etc...
Je pense avoir trouvé :
Range("A1").Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Add Key:=Range("A3:J3"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Feuil1").Sort
.SetRange Range("A1:J25")
.Header = xlYes
.MatchCase = False
.Orientation = xlLeftToRight
.SortMethod = xlPinYin
.Apply
est ce que c'est cohérent ?
Cordialement.