classer par ordre alpha

[nrdz83]

Bonjour à tous voila je n'arrive pas a faire le code vba, je souhaite classer mon tableau les "noms" par ordre alphabetique et la colonne 'armements" par armements.
D'avance merci pour vos lumières et a bientot amitiés 😉
le lien du fichier>>>Cijoint.fr - Service gratuit de dépôt de fichiers

 

[Jelf]

Re : classer par ordre alpha

Bonjour le forum, bonjour nrdz83.
Comment t'aider ???, il y a des mots de passe partout.

Amicalement

Jelf

 

[nrdz83]

Re : classer par ordre alpha

desolé je viens de m'en apercvoir je le remets sans pass

Cijoint.fr - Service gratuit de dépôt de fichiers

d'avance merci à tous 😎

 

[pierrejean]

Re : classer par ordre alpha

bonjour a tous
A ajouter dans le module2

Sub classerpararmements()
Range("A2:P" & [A65000].End(xlUp).Row).Sort Key1:=Range("F2"), Order1:=xlAscending, Key2:=Range("A3") _
        , Order2:=xlAscending, Header:=xlYes, OrderCustom:=n + 1
End Sub
Sub classerparnom()
Range("A2:P" & [A65000].End(xlUp).Row).Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("A3") _
        , Order2:=xlAscending, Header:=xlYes, OrderCustom:=n + 1
End Sub

 

[nrdz83]

Re : classer par ordre alpha

un grand merci pierre jean j'avais essayer ce code et j'avais une erreur a ce niveau OrderCustom:=n + 1
enfin la ça fonctionne un grand merci, mes amitiés 😎