Tri en vba automatique colonne

tinet · 5 Septembre 2012

bonjour le forum,

j'ai trouvé cette formule pour trier automatiquement les colonnes, mais je voudrais que le tri se fasse à partir de la ligne deux et pas sur toute la colonne.

Sub Trier()
On Error Resume Next
'for i = 1 to 1 pour 1 colonne,for i = 1 to 2 pour 2 colonnes, etc
For i = 1 To 2
Sheets("liste").Columns(i).Sort Key1:=Cells(1, i), Order1:=xlAscending
Next i
End Sub

Merci pour votre aide

Papou-net · 5 Septembre 2012

Re : Tri en vba automatique colonne

Bonjour tinet,

Ajoute le paramètre Header à la commande Sort :

Code:

Sub Trier()
On Error Resume Next
'for i = 1 to 1 pour 1 colonne,for i = 1 to 2 pour 2 colonnes, etc
    For i = 1 To 2
        Sheets("liste").Columns(i).Sort Key1:=Cells(1, i), Header:=xlGuess, Order1:=xlAscending
    Next i
End Sub

Cordialement.

tinet · 5 Septembre 2012

Re : Tri en vba automatique colonne

Bonjour Papou net.

Merci

Tri en vba automatique colonne

tinet

XLDnaute Impliqué

Papou-net

XLDnaute Barbatruc

tinet

XLDnaute Impliqué

Discussions similaires