tri

K

kllmoon

XLDnaute Occasionnel

• 10 Février 2009

• #2

Re : tri

https://www.excel-downloads.com/threads/tri-automatique-chiffres-ordre-croissant.38292/

 

Vote positif 0 Vote négatif

B

babou466

Guest

• 10 Février 2009

• #3

Re : tri

en fait j'ai tenté ce code...qui ne fonctionne absolument pas...
Sub tri_par_ordre_croissant()

Dim vlNbLigne As Integer
Dim vlLigne As Integer
Dim vlStockage As Integer
Dim tableau(1 To 5) As Variant

vlLigne = 1
vlNbLigne = 0

While Cells(vlLigne, 1).Value <> ""
vlNbLigne = vlNbLigne + 1
Wend

For vlLigne = 1 To vlNbLigne
If Cells(vlLigne, 1).Value < Cells(vlLigne - 1, 1).Value Then
vlStockage = Cells(vlLigne, 1).Value
tableau(vlLigne) = tableau(vlLigne - 1)
vlNbLigne = vlNbLigne - 1
End If
Next vlLigne

End Sub

 

Vote positif 0 Vote négatif

B

babou466

Guest

• 10 Février 2009

• #4

Re : tri

enfin plutôt de cette façon:
Sub tri_par_ordre_croissant()

Dim vlNbLigne As Integer
Dim vlLigne As Integer
Dim vlStockage As Integer
Dim tableau(1 To 5) As Variant

vlLigne = 1
vlNbLigne = 5


For vlLigne = 1 To 5
If Cells(vlLigne, 1).Value < Cells(vlLigne - 1, 1).Value Then
vlStockage = Cells(vlLigne, 1).Value
tableau(vlLigne) = tableau(vlLigne - 1)
vlNbLigne = vlNbLigne - 1
End If
Next vlLigne

End Sub

 

Vote positif 0 Vote négatif

K

keepcool183

XLDnaute Occasionnel

• 10 Février 2009

• #5

Re : tri

Bonjour,

Tu veux trier des données dans un tableau (avec ou sans entête) ou dans un contrôle ?

 

Vote positif 0 Vote négatif

B

babou466

Guest

• 10 Février 2009

• #6

Re : tri

en fait je voudrait trier une colonne que je n'ai pas définie comme un tableau, mais ça semble nécesaire non?
et pardon dans mon dernier code je pensais plutôt:
For vlLigne = 1 To vlNbLigne

 

Vote positif 0 Vote négatif

K

keepcool183

XLDnaute Occasionnel

• 10 Février 2009

• #7

Re : tri

Sub Tris()
Range("ta plage").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess
End Sub

Essaie ça

 

Vote positif 0 Vote négatif

B

babou466

Guest

• 10 Février 2009

• #8

Re : tri

merci beaucoup, c'est impecable; cependant est ce que dans un programme je peux m'exprimer en range("cells( ...).value:cells(...).value").select pour la plage sélectionnée à trier?

 

Vote positif 0 Vote négatif

ROGER2327

XLDnaute Barbatruc

• 10 Février 2009

• #9

Re : tri

Bonjour.

À babou466 : pour sélectionner une plage selon votre principe, je pense que la syntaxe correcte est :

Code:

Range(Cells([I]l1[/I], [I]c1[/I]), Cells([I]l2[/I], [I]c2[/I])).Select

où l1 est le rang de la première ligne à sélectionner, c1 celui de la première colonne, l2 celui de la dernière ligne et c2 celui de la dernière colonne.​

Bon courage !
ROGER2327

 

Vote positif 0 Vote négatif

K

keepcool183

XLDnaute Occasionnel

• 10 Février 2009

• #10

Re : tri

Re,

Je ne comprend pas l'utilité du "value" dans ce que tu as écris 🙂

Si tu pouvais étoffer un peu 😀

Edit : En effet comme l'as dis ROGER2327 c'est la syntaxe à utiliser

 

Vote positif 0 Vote négatif

B

babou466

Guest

• 10 Février 2009

• #11

Re : tri

en fait j'ai utilisé le .value car je pensais à la plage de la valeur... à la valeur...,
merci à vous

 

Vote positif 0 Vote négatif

B

babou466

Guest

• 11 Février 2009

• #12

Re : tri

si je souhaite maintenant trier des lignes d'un tableau(X,3), de façon décroissante, suivant le critère de ma troisième colonne comment dois je procéder?

est ce que la sélection se fait de cette façon:
Range(Cells(dernière ligne, dernière colonne), Cells(première ligne , première colonne)).Select
et après comment faire?

merci

 

Vote positif 0 Vote négatif