Tri sous VBA

dg62

XLDnaute Barbatruc

• 31 Octobre 2005

• #2

bonjour Daffy


Sélectionner ta liste, Données Trier, définir les critères du tri et valider.

 

Vote positif 0 Vote négatif

D

Daffy

Guest

• 31 Octobre 2005

• #3

Re Bonjour

J'ai du mal rediger ma demande car je souhaite trier dans l'ordre croissant les cellules A1 à A10 puis toujours dans l'odre croissant B1 à B10 et ainsi de suite. La solution proposée sous Excel ne marche pas pour l'ensemble des 4000 lignes

merci pour cette reponse

 

Vote positif 0 Vote négatif

dg62

XLDnaute Barbatruc

• 31 Octobre 2005

• #4

re

Pourquoi cela ne fonctionne pas sur 4000 lignes ?

si tu as 4000 lignes à trier, pourquoi tu parle de A1:A10 puis de B1:B10...


Tes explications ne sont pas claires.

 

Vote positif 0 Vote négatif

D

daffy

Guest

• 31 Octobre 2005

• #5

tout simplement parce que les cellules A1 à A10 et B1 à B10 etc ...n'ont rien à voir entre elles et le tri doit se faire par ligne c'est à dire de la gauche vers la droite

A+

Daffy

 

Vote positif 0 Vote négatif

M

Marc_du_78

XLDnaute Accro

• 31 Octobre 2005

• #6

Bonjour le forum, Dg62, Daffy

Sélectionner zone à trier puis , Données, Trier, Options, De la gauche vers la droite devrait fonctionner
En vous souhaitant une bonne journée

 

Vote positif 0 Vote négatif

dg62

XLDnaute Barbatruc

• 31 Octobre 2005

• #7

re

dans données/trier, tu vas dans option s et tu changes l'orientation du tri. Tu coches de la gauche vers la droite.

 

Vote positif 0 Vote négatif

D

daffy

Guest

• 31 Octobre 2005

• #8

Ou ca ne marche pas et dans ce cas c'est sur mes 2 pc ou alors je dois tres mal m'expliquer car il n'est pas possible de faire un tri sur plusieurs lignes ou plusieurs colonnes à la fois avce le MEME critère

C'est pour cette raison que la solution se trouve dans une macro visual basic

A+

 

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 31 Octobre 2005

• #9

Bonjour daffy
Bonjour dg62,
Bonjour Marc,

Un petit fichier exemple avec ta première situation et à côtè, ce que veux obtenir. Eventuellement, quelques explications ciblées.
Car les réponses déjà données semblent correspondre.....

Bonne aprem. à tous.

Jean-Pierre

 

Vote positif 0 Vote négatif

D

daffy

Guest

• 31 Octobre 2005

• #10

Bonjour à toutes les bonnes volontés

Ci joint un fichier des données de départ et ce que je souhaite obtenir mais pour 4000 lignes

A+

Daffy

 

Vote positif 0 Vote négatif

D

daffy

Guest

• 31 Octobre 2005

• #11

Bonjour à toutes les bonnes volontés

Ci joint à la demande de Jean Pierre un fichier des données de départ et ce que je souhaite obtenir mais pour 4000 lignes

A+

Merci par avance

 

Vote positif 0 Vote négatif

dg62

XLDnaute Barbatruc

• 31 Octobre 2005

• #12

re

Code:

Sub trilignes()
Dim i As Integer

For i = 1 To 10
    Range(Cells(i, 1), Cells(i, 5)).Select
    Selection.Sort Key1:=Range('A' & i), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
        DataOption1:=xlSortNormal
Next i
End Sub

à adapter

 

Vote positif 0 Vote négatif

D

daffy

Guest

• 31 Octobre 2005

• #13

Merci sincèrement à dg62 qui m'a apporté la réponse après beaucoup d'échanges d'explications

A plus tard sur le forum

Daffy

 

Vote positif 0 Vote négatif