Bonjour: tri de données hippiques
bonjour,
voici mon problème:
j'arrive à trier les premiières données
mais c'est ensuite que cela se complique
car les autres ne se trient plus
pourquoi je ne sais rien .
j'envoie un fichier et le code qui j'espere, seront beaucoup plus clairs
merci d'avance pour votreaide
5 Baronne de Hélon D4 E1 G. Gillot 11 17 6 7,50% 4,90% -3% 19 19 14 19 19 5
12 Bande à Trois F. Nivard 12 18 6 6,90% 4,60% -2% 11 11 7 11 11 12
11 Bravia d'Avèze D4 F. Lagadeuc 6,3 7 0,7 13% 11,80% -1% 5 17 17 5 17 11
4 Bloody Holly D4 E. Raffin 21 32 11 3,90% 2,60% -1% 12 14 19 12 14 4
1 Brise de l'eclair M. Viel 16 21 5 5,20% 4% -1% 1 5 11 1 5 1
19 Belle du Mont R. Joly 2,5 2,6 0,1 33% 31,90% -1% 17 7 8 17 7 19
2 Balade Majyc A. Lhérété 21 28 7 3,90% 3,00% -1% 4 12 16 4 12 2
10 Bimbo Aldo A. Abrivard 33 50 17 2,50% 1,70% -1% 2 1 1 2 1 10
18 Baïka du Vivier A. Lamy 24 31 7 3,40% 2,70% -1% 16 16 6 16 16 18
9 Basmine DA P. Houel 46 70 24 1,80% 1,20% -1% 18 2 5 18 2 9
20 Bacarella D4 J.-Ph. Borodajko 62 93 31 1,30% 0,90% 0% 10 18 12 10 18 20
16 Bright Girl DA Mlle E. Allaire 21 24 3 3,90% 3,50% 0% 6 4 2 6 4 16
13 Bella Pouliguen D. Bonne 124 186 62 0,70% 0,40% 0% 7 6 18 7 6 13
15 Bella Sly DP Cl. Frecelle 124 186 62 0,70% 0,40% 0% 9 10 4 9 10 15
3 Balade des Racques D4 M. Daougabel 93 140 47 0,90% 1% 0% 8 8 10 8 8 3
6 Bellitta DP D. Javelle 41 46 5 2,00% 1,80% 0% 20 9 9 20 9 6
7 Baraka du Loir DP E1 M. Mottier 41 17 -24 2,00% 4,90% 3% 14 20 20 14 20 7
17 Baraka du Wallon DP D. Thomain 19 9 -10 4,40% 9,20% 5% 3 3 3 3 3 17
14 Beauté de Maël D4 F. Gence 62 9,5 -52,5 1% 9% 7% 13 13 13 13 13 14
8 Belle de Corveil A. Wiels 58 59 1 1,40% 1,40% 15 15 15 15 15 8
1 Charmeur M. Brault 0 0 0,00% 0,00% 1 1 1 1 1 1
2 Crack de Reux F. Nivard 4,1 4,1 20,20% 20,20% 2 2 2 2 2 2
3 Colonel Bond V. Renault 0 0 0,00% 0,00% 3 3 3 3 3 3
4 Cri d'Amour S. Hervalet 0 0 0,00% 0,00% 4 4 4 4 4 4
5 Célios de Laurma R. Delaune 0 0 0,00% 0,00% 5 5 5 5 5 5
6 Clovis Montaval E. Raffin 13 24 11 6,40% 3,50% -3% 6 6 6 6 6 6
7 Capitano de Lou A. Abrivard 1,6 1,3 -0,3 51,70% 63,90% 12% 7 7 7 7 7 7
8 Castagneto J. Dubois 0 0 0,00% 0% 8 8 8 8 8 8
9 Clezio Josselyn J.-E. Dubois 0 0 0,00% 0% 9 9 9 9 9 9
10 Cotton Club A. Cottard 7,7 13 5,3 10,70% 6,40% -4% 10 10 10 10 10 10
11 Casimir de Survie E. Szirmay 0 0 0,00% 0,00% 11 11 11 11 11 11
12 Coeur d'Alesa S. Ernault 18 32 14 4,60% 3% -2% 12 12 12 12 12 12
13 Carodor F. Blandin 0 0 0,00% 0% 13 13 13 13 13 13
14 Centon M. Abrivard 13 24 11 6,40% 3,50% -3% 14 14 14 14 14 14
15 Cyprès du Mont H. Gilles 0 0 0,00% 0,00% 15 15 15 15 15 15
16 Campeone Vas D. de Jésus Reis 0 0 0,00% 0% 16 16 16 16 16 16
1 Caline d'Okla A. Wiels 21 41 20 4,00% 2,00% -2% 1 1 1 1 1 1
2 Carmensita de Lou A. Abrivard 28 13 -15 3% 6% 3% 2 2 2 2 2 2
3 Cindy d'Evel Mlle Cl. Beiléard 0 0 0% 0,00% 3 3 3 3 3 3
4 Clara du Pontseuil Ant. Dollion 0 4,1 4,1 0% 20% 20% 4 4 4 4 4 4
5 Corsica Sky M. Mottier 0 54 54 0,00% 1,50% 2% 5 5 5 5 5 5
6 Canberra d'Oyse D. Bonne 28 54 26 3% 2% -2% 6 6 6 6 6 6
7 Cool Ma Poule A. Lamy 28 54 26 3,00% 1,50% -2% 7 7 7 7 7 7
8 Chimène Speed A. Desmarres 0 54 54 0% 2% 2% 8 8 8 8 8 8
9 Coudrée Léman M. Viel 0 13 13 0,00% 6,40% 6% 9 9 9 9 9 9
10 Calie de Pommeraye F. Lagadeuc 21 16 -5 4,00% 5,20% 1% 10 10 10 10 10 10
11 Californie J. R. Launois 4,3 8,2 3,9 19% 10,10% -9% 11 11 11 11 11 11
12 Citation V. Saussaye 0 0 0,00% 0,00% 12 12 12 12 12 12
13 Chistera de l'Iton Y. Lebourgeois 28 8,6 -19,4 3,00% 9,60% 7% 13 13 13 13 13 13
14 Chiloé D. Thomain 9,6 13 3,4 9% 6% -2% 14 14 14 14 14 14
15 Corona de Joudes F. Nivard 1,6 3 1,4 52,10% 27,60% -25% 15 15 15 15 15 15
1 Uratcho C. Megissier 43 63 20 1,90% 1,30% -1% 1 1 1 1 1 1
2 Ustin de Littry F. Nivard 5,1 5,5 0,4 16,20% 15,10% -1% 2 2 2 2 2 2
3 Vintage DP Th. Levesque 10 10 8,30% 8,30% 3 3 3 3 3 3
4 Volt d'Ory D4 S. Hardy 16 23 7 5,20% 3,60% -2% 4 4 4 4 4 4
5 Texto DA P. Lefrançois 0 0 0,00% 0,00% 5 5 5 5 5 5
6 Tobacco Light C. Lancelin 0 0 0,00% 0,00% 6 6 6 6 6 6
7 Un Amour du Pont L. Col 0 0 0,00% 0,00% 7 7 7 7 7 7
8 Uraeus du Fossé L. Saccomandi 0 0 0,00% 0,00% 8 8 8 8 8 8
9 Uranus Darche A. Gilles 43 63 20 1,90% 1,30% -1% 9 9 9 9 9 9
10 Upland de l'Iton T. de Genouillac 0 31 31 0,00% 2,70% 3% 10 10 10 10 10 10
11 Utile Charentais D4 J.-M. Bazire 12 6,3 -5,7 7% 13,20% 6% 11 11 11 11 11 11
12 Udon de la Fonte P. G. Cavey 0 0 0,00% 0,00% 12 12 12 12 12 12
13 Véloce du Londel DP X. Lignel 43 63 20 1,90% 1,30% -1% 13 13 13 13 13 13
14 Unbridled Charm J.-Ph. Dubois 2,7 3 0,3 30,60% 27,70% -3% 14 14 14 14 14 14
15 Triomphe Jénilou DP M. Tourteau 43 63 20 1,90% 1,30% -1% 15 15 15 15 15 15
16 Utélo de Carentone D4 G. Maillard (T) 4,3 6,3 2 19,20% 13,20% -6% 16 16 16 16 16 16
17 Taramis d'Aubrac St. Meunier 0 12 12 0% 6,90% 7% 17 17 17 17 17 17
18 Tan d'Erable D. Thomain 14 21 7 5,90% 4,00% -2% 18 18 18 18 18 18
voici: le code
Columns("K:P").Select
Selection.ColumnWidth = 5
Range("A4:I4").Select
Selection.AutoFilter
ActiveWorkbook.Worksheets("Feuil1").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Feuil1").AutoFilter.Sort.SortFields.Add Key:=Range _
("D4"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("Feuil1").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
Range("A:A").Select
Selection.Copy
Range("k:K").Select
ActiveSheet.Paste
ActiveWorkbook.Worksheets("Feuil1").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Feuil1").AutoFilter.Sort.SortFields.Add Key:=Range _
("E4"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("Feuil1").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
Range("A:A").Select
Selection.Copy
Range("L:L").Select
ActiveSheet.Paste
Range("K:L").Select
Selection.Copy
Range("N:O").Select
ActiveSheet.Paste
ActiveWorkbook.Worksheets("Feuil1").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Feuil1").AutoFilter.Sort.SortFields.Add Key:=Range _
("F4"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("Feuil1").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
Range("A:A").Select
Selection.Copy
Range("M:M").Select
ActiveSheet.Paste
Columns("M:M").Select
With Selection.Font
.Color = -16776961
End With
Wahou, intéressant ... mais avec le fichier ce serait encore mieux que de copier/coller ce texte dans un fichier excel vierge.
Merci
bonjour,
voici mon problème:
j'arrive à trier les premières
données
mais c'est ensuite que cela se complique
car les autres ne se trient plus
pourquoi je ne sais rien .
j'envoie un fichier et le code qui j'espère, seront beaucoup plus clairs
merci d'avance pour votre aide
Wahou, intéressant ... mais avec le fichier ce serait encore mieux que de copier/coller ce texte dans un fichier excel vierge.
Merci