Tri croissant d'une ligne excel
Fermé
franck075
Messages postés
3
Date d'inscription
mardi 13 janvier 2015
Statut
Membre
Dernière intervention
13 janvier 2015
-
13 janv. 2015 à 11:12
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 - 13 janv. 2015 à 16:15
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 - 13 janv. 2015 à 16:15
A voir également:
- Tri croissant d'une ligne excel
- Aller à la ligne excel - Guide
- Excel trier par ordre croissant chiffre - Guide
- Liste déroulante excel - Guide
- Formule excel - Guide
- Déplacer une colonne excel - Guide
4 réponses
Gyrus
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
523
13 janv. 2015 à 11:21
13 janv. 2015 à 11:21
Bonjour,
Tu peux :
1) faire un "copier / collage spécial transposé" des tes données afin de disposer les données en colonne.
2) faire une "suppression des doublons"
3) faire un tri croissant
A+
Tu peux :
1) faire un "copier / collage spécial transposé" des tes données afin de disposer les données en colonne.
2) faire une "suppression des doublons"
3) faire un tri croissant
A+
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 396
13 janv. 2015 à 11:17
13 janv. 2015 à 11:17
Bonjour
le plus simple sans passer par VBA est:
copier la ligne
clic droit / collage spécial / option "transposé" sur une colonne vide
ruban / Données / supprimer les doublons
trier la colonne
crdlmnt
le plus simple sans passer par VBA est:
copier la ligne
clic droit / collage spécial / option "transposé" sur une colonne vide
ruban / Données / supprimer les doublons
trier la colonne
crdlmnt
franck075
Messages postés
3
Date d'inscription
mardi 13 janvier 2015
Statut
Membre
Dernière intervention
13 janvier 2015
13 janv. 2015 à 15:48
13 janv. 2015 à 15:48
Merci pour la réponse.
Par contre si je veux le faire automatiquement je dois absoluement utiliser VBA alors...
Connais tu le code à utiliser ?
Merci d'avance.
Franck
Par contre si je veux le faire automatiquement je dois absoluement utiliser VBA alors...
Connais tu le code à utiliser ?
Merci d'avance.
Franck
franck075
Messages postés
3
Date d'inscription
mardi 13 janvier 2015
Statut
Membre
Dernière intervention
13 janvier 2015
13 janv. 2015 à 11:33
13 janv. 2015 à 11:33
Merci pour vos réponses mais si je veux le faire automatiquement ?
Cdt
Cdt
Gyrus
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
523
13 janv. 2015 à 16:15
13 janv. 2015 à 16:15
Tu peux utiliser l'enregistreur de macro.
Voici un code généré par l'enregistreur et adapté pour la plage de données initiales en A1:F1. Le collage spécial transposé est effectué en H1. Après suppression des doublons, la plage H1:H4 est triée suivant ordre croissant.
A+
Voici un code généré par l'enregistreur et adapté pour la plage de données initiales en A1:F1. Le collage spécial transposé est effectué en H1. Après suppression des doublons, la plage H1:H4 est triée suivant ordre croissant.
Sub Copier()
Application.ScreenUpdating = False
With ActiveWorkbook.Worksheets("Feuil1")
.Range("A1:F1").Copy
.Range("H1").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
.Application.CutCopyMode = False
.Range("$H$1:$H$6").RemoveDuplicates Columns:=1, Header:=xlNo
.Sort.SortFields.Clear
.Sort.SortFields.Add Key:=.Range("H1:H4"), SortOn:=xlSortOnValues, _
Order:=xlAscending, DataOption:=xlSortNormal
.Sort.SetRange .Range("H1:H4")
.Sort.Header = xlGuess
.Sort.MatchCase = False
.Sort.Orientation = xlTopToBottom
.Sort.SortMethod = xlPinYin
.Sort.Apply
.Activate
.Range("A1").Select
End With
End Sub
A+
