Discussion :

[illight]

Bonjour,

j'ai fait une recherche sur le forum et je sais que le problème a été maintes fois posé et je suis désolé de refaire un topic mais en fait ce que j'ai lu ne marchait pas et je comprend pas

Donc en fait j'ai une plage dans une feuille Excel que j'ai sélectionné et je voudrais fair eun tri suivant une colonne..Pour cela j'ai créé la procédure suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Sub tri(nomF As String)
Dim f As Worksheet
Set f = Worksheets(nomF)
Dim i As Integer
Dim j As Integer
For i = 1 To nombre_ligne(nomF)
    For j = 1 To 5
        f.Cells(i, j).Select
    Next j
Next i
With Selection
    .Sort Key1:=Range("C1"), Order1:=xlAscending, Header:=xlNo, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    .HorizontalAlignment = xlLeft
 
End With
End Sub

la fonction nombre_ligne(NomF) compte le nombre de ligne de la feuille (parce qu'il y a des torus dans le slignes bref )

Donc en fait ce que j'ai fait j'ai créé une macro automatique pour voir le code a metttre et après je l'ai mise dans cette macro donc j'ai créé une boucle pour sélectionner ma plage puis je fais un with ou je veux faire mon tri

Mais j'ai une erreur et il bloque sur le tri il me dit que l'argument n'est pas bon

Quelqu'un aurait-il une solution ? y a t'il une erreur dans ma procédure ?


Merci beaucoup pour votre aide

[SfJ5Rpw8]

en fait c'est ta boucle de selection qui ne marche pas en fait tu ne sélectionne que la deniere cellule

enlève ta boucle for et essai quelquechose du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
with Range(Cells(1, 1), Cells(NombreDeLigne, 5)
...

[illight]

yes ça marche merci beaucoup