• Initiateur de la discussion Initiateur de la discussion Piffard
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

P

Piffard

Guest
Bonjour,

je cherche à faire un tri alphabétique sur pls cellules d´une ligne.
En fait 7 cellules d´une ligne comprennent chacunes une lettre.
MAIS, ayant un nombre important de ligne, je ne peux le faire ligne à ligne. Quelqu´un aurait-il une solution.

merci

Si je ne suis pas clair dans ma requête, n´hésitez pas à m´en faire part
 
Salut

tiens j'ai fait une petite macro ki marche apparemment

Dim i As Integer

For i = 1 To 2000

Range(Cells(i, 1), Cells(i, 7)).Select
Selection.Sort Key1:=Cells(i, 1), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
DataOption1:=xlSortNormal

Next i

Range("A1").Select


Je sais doit y a voir mieux question esthétik mais bon je fais ce ke je peux!!
a+
will
 
Voila la macro en entier avec les explications a coté
Pour la rentrer sous excel, tu fais alt+F11 , tu as un bouton dans la barre d'outils créer module, tu en crée un et apres tu colles dedans le code donné ci-dessous.
Ensuite soit tu lances la macro a partir du menu "macro" soit tu crées un bouton auquel tu affectes la macro (tu le fais avec le click droit). C pas tres compliqué à faire la premiere fois je pense

will



Option explicit

Sub tri_ligne

Dim i As Integer 'on déclare la variable

For i = 1 To 54600 'tu mets ici le nombre de lignes pour lequel tu veux que la macro se fasse

Range(Cells(i, 1), Cells(i, 7)).Select
Selection.Sort Key1:=Cells(i, 1), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
DataOption1:=xlSortNormal

' le tri est fait

Next i

Range("A1").Select ' ca repositionne en A1

End sub
 
Salut,

Oups j'avais pas vu que Piffard avait doublé son post. D'ailleurs c'est pas à faire . Will les select quand on peut s'en passer on les évite, sur 50000 lignes lancer un sort sur chaque ça risque d'être longuet même en bloquant le raffraichissement d'écran avec application.screenupdating=false .
Il vaut mieux passer par des tableaux comme j'ai répondu dans l'autre post.

A+++
 
Salut Zon,

je suis d'accord avec toi mais je voulais essayer d'aider Piffard comme je le pouvais! mais j'ai deja fait des macros comme ca sur des grandes bases de données et ca m'a jamais bloqué...??
bon en tout cas j'espere qu'il aura vu ta solution...
a +
will
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
7
Affichages
286
Réponses
3
Affichages
177
  • Question Question
Microsoft 365 Vba
Réponses
3
Affichages
217
Réponses
2
Affichages
506
  • Question Question
Microsoft 365 MFC dans tableau
Réponses
2
Affichages
291
  • Question Question
Microsoft 365 tri dans Excell
Réponses
19
Affichages
697
Réponses
2
Affichages
134
Retour