Trier des cellules avec formules
Résolu/Fermé
pinpon59
Messages postés
306
Date d'inscription
mardi 15 avril 2008
Statut
Membre
Dernière intervention
28 octobre 2018
-
12 déc. 2013 à 19:04
pinpon59 Messages postés 306 Date d'inscription mardi 15 avril 2008 Statut Membre Dernière intervention 28 octobre 2018 - 14 déc. 2013 à 17:27
pinpon59 Messages postés 306 Date d'inscription mardi 15 avril 2008 Statut Membre Dernière intervention 28 octobre 2018 - 14 déc. 2013 à 17:27
A voir également:
- Trier des cellules avec formules
- Formule excel pour additionner plusieurs cellules - Guide
- Excel trier par ordre croissant chiffre - Guide
- Verrouiller des cellules excel - Guide
- Formules - Télécharger - Études & Formations
- Formules excel de base - Guide
3 réponses
via55
Messages postés
14509
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
2 janvier 2025
2 739
12 déc. 2013 à 20:56
12 déc. 2013 à 20:56
Bonsoir
Il faut faire un copier-coller special uniquement des valeurs pour ensuite pouvoir les trier et supprimer les doublons
J'ai automatisé cette copie et la suite par une macro à déclencher avec le bouton sur la feuille
https://www.cjoint.com/?0Lmu2S0H6FL
Cdlmnt
Il faut faire un copier-coller special uniquement des valeurs pour ensuite pouvoir les trier et supprimer les doublons
J'ai automatisé cette copie et la suite par une macro à déclencher avec le bouton sur la feuille
https://www.cjoint.com/?0Lmu2S0H6FL
Cdlmnt
pinpon59
Messages postés
306
Date d'inscription
mardi 15 avril 2008
Statut
Membre
Dernière intervention
28 octobre 2018
111
13 déc. 2013 à 15:00
13 déc. 2013 à 15:00
Bonjour,
c'est exactement ce que je voulais. Par contre est il possible de triée et de supprimer les doublons avec la liste actuelle (sans refaire une liste à coté) et j'aimerai savoir comment faire pour copier la macro dans d'autres onglet.
Encore merci pour votre aide. Je me doutais qu'il fallait une macro, mais je ne sais pas du tout comment en faire une.
Cordialement.
c'est exactement ce que je voulais. Par contre est il possible de triée et de supprimer les doublons avec la liste actuelle (sans refaire une liste à coté) et j'aimerai savoir comment faire pour copier la macro dans d'autres onglet.
Encore merci pour votre aide. Je me doutais qu'il fallait une macro, mais je ne sais pas du tout comment en faire une.
Cordialement.
via55
Messages postés
14509
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
2 janvier 2025
2 739
13 déc. 2013 à 15:49
13 déc. 2013 à 15:49
Bonjour
La liste à côté est obligatoire car les cellules de la colonne J contiennent les formules de références à d''autres cellules (ce qui occasionnait l'erreur REF lors du tri)
Pour adapter la macro à d'autres onglets
1) Il faut copier la macro et donner un nouveau nom à la Sub (par exemple tri2 au lieu de trietdoublons) pour chaque onglet différent et modifier les references d'adresse de feuille et de cellules qui ne seront pas les même (celles que j'ai mis en gras dans la macro)
Sub trietdoublons()
'
Range("J2:J14").Select
Selection.Copy
Range("K2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveWorkbook.Worksheets("vendredi 19 à 23").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("vendredi 19 à 23").Sort.SortFields.Add Key:=Range( _
"K2"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("vendredi 19 à 23").Sort
.SetRange Range("K2:K14")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
ActiveSheet.Range("$K$2:$K$14").RemoveDuplicates Columns:=1, Header:=xlNo
End Sub
2) Mettre un bouton dans l'onglet et lui affecter la macro correspondante (clic droit sur le bouton puis Visualiser le code et dans la Private sub indiquer le nom de la macro
ex :
Private Sub CommandButton1_Click()
tri2
End Sub
Cdlmnt
La liste à côté est obligatoire car les cellules de la colonne J contiennent les formules de références à d''autres cellules (ce qui occasionnait l'erreur REF lors du tri)
Pour adapter la macro à d'autres onglets
1) Il faut copier la macro et donner un nouveau nom à la Sub (par exemple tri2 au lieu de trietdoublons) pour chaque onglet différent et modifier les references d'adresse de feuille et de cellules qui ne seront pas les même (celles que j'ai mis en gras dans la macro)
Sub trietdoublons()
'
Range("J2:J14").Select
Selection.Copy
Range("K2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
ActiveWorkbook.Worksheets("vendredi 19 à 23").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("vendredi 19 à 23").Sort.SortFields.Add Key:=Range( _
"K2"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("vendredi 19 à 23").Sort
.SetRange Range("K2:K14")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
ActiveSheet.Range("$K$2:$K$14").RemoveDuplicates Columns:=1, Header:=xlNo
End Sub
2) Mettre un bouton dans l'onglet et lui affecter la macro correspondante (clic droit sur le bouton puis Visualiser le code et dans la Private sub indiquer le nom de la macro
ex :
Private Sub CommandButton1_Click()
tri2
End Sub
Cdlmnt
pinpon59
Messages postés
306
Date d'inscription
mardi 15 avril 2008
Statut
Membre
Dernière intervention
28 octobre 2018
111
>
via55
Messages postés
14509
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
2 janvier 2025
14 déc. 2013 à 09:52
14 déc. 2013 à 09:52
bonjour
OK merci. peut tu m expliquer plus précisément comment copier une macro, je ne mis connaît pas du tout
merci.
OK merci. peut tu m expliquer plus précisément comment copier une macro, je ne mis connaît pas du tout
merci.
pinpon59
Messages postés
306
Date d'inscription
mardi 15 avril 2008
Statut
Membre
Dernière intervention
28 octobre 2018
111
>
via55
Messages postés
14509
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
2 janvier 2025
14 déc. 2013 à 09:52
14 déc. 2013 à 09:52
bonjour
OK merci. peut tu m expliquer plus précisément comment copier une macro, je ne mis connaît pas du tout
merci.
OK merci. peut tu m expliquer plus précisément comment copier une macro, je ne mis connaît pas du tout
merci.
via55
Messages postés
14509
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
2 janvier 2025
2 739
Modifié par via55 le 14/12/2013 à 11:17
Modifié par via55 le 14/12/2013 à 11:17
bonjour
Tu peux faire un copier coller à partir de mon précédent message
Alt +F11 pour ouvrir l'éditeur Visual Basic
Puis Insertion Module
et tu colles la macro dans la partie droite blanche de la fenetre
ensuite tu modifies les references de feuille dans les 3 lignes où elles se trouvent et éventuellement toutes les références de cellules si ce ne sont pas les mêmes
et tu changes le nom de la macro sur la 1ere ligne
enfin tu fermes l'éditeur et tu selectionnes la feuille où appliquer la macro
pour activer la macro :
soit tu vas dans le menu Developpeur, Macros et tu fais executer ta macro
soit comme j'avais fait tu crées un bouton et tu lui affectes la macro
pour créer le bouton : menu Developpeur, Inserer, Controle active X, Bouton
ensuite clic droit sur le bouton Visualiser le code et entre les 2 lignes Sub et End sub tu mets le nom de la macro puis tu desactives le mode Création
Si le menu Développeur n'apparait pas dans ta barre de menu en haut il faut aller dans Options Excel (à partir du bouton Office en haut à gauche) , Standard et cocher l'option Afficher l'onglet Developpeur
Cdlmnt
Tu peux faire un copier coller à partir de mon précédent message
Alt +F11 pour ouvrir l'éditeur Visual Basic
Puis Insertion Module
et tu colles la macro dans la partie droite blanche de la fenetre
ensuite tu modifies les references de feuille dans les 3 lignes où elles se trouvent et éventuellement toutes les références de cellules si ce ne sont pas les mêmes
et tu changes le nom de la macro sur la 1ere ligne
enfin tu fermes l'éditeur et tu selectionnes la feuille où appliquer la macro
pour activer la macro :
soit tu vas dans le menu Developpeur, Macros et tu fais executer ta macro
soit comme j'avais fait tu crées un bouton et tu lui affectes la macro
pour créer le bouton : menu Developpeur, Inserer, Controle active X, Bouton
ensuite clic droit sur le bouton Visualiser le code et entre les 2 lignes Sub et End sub tu mets le nom de la macro puis tu desactives le mode Création
Si le menu Développeur n'apparait pas dans ta barre de menu en haut il faut aller dans Options Excel (à partir du bouton Office en haut à gauche) , Standard et cocher l'option Afficher l'onglet Developpeur
Cdlmnt
pinpon59
Messages postés
306
Date d'inscription
mardi 15 avril 2008
Statut
Membre
Dernière intervention
28 octobre 2018
111
14 déc. 2013 à 17:27
14 déc. 2013 à 17:27
bonjour,
merci beaucoup d'avoir pris le temps de m'expliquer, j'ai un peu galérer pour comprendre au début, mais les explications sont claires, et j'ai réussi. Encore un grand merci.
merci beaucoup d'avoir pris le temps de m'expliquer, j'ai un peu galérer pour comprendre au début, mais les explications sont claires, et j'ai réussi. Encore un grand merci.