Tri alphabétique vba
Résolu/Fermé
raoulmenard
Messages postés
23
Date d'inscription
mardi 28 octobre 2014
Statut
Membre
Dernière intervention
15 mars 2016
-
29 oct. 2014 à 10:28
raoulmenard Messages postés 23 Date d'inscription mardi 28 octobre 2014 Statut Membre Dernière intervention 15 mars 2016 - 3 nov. 2014 à 17:32
raoulmenard Messages postés 23 Date d'inscription mardi 28 octobre 2014 Statut Membre Dernière intervention 15 mars 2016 - 3 nov. 2014 à 17:32
Bonjour,
j'ai créé un tableau excel a deux feuil.sur la feuil1 j'ai créé un formulaire de saisi classique qui ajoute les données sur la feuil2 en A1 et B1 .la colonne a répertorie une ville et la B un parcours.par exemple en A1 "paris" et en B1 "bords de la seine". Les données saisie dans le formulaire Userform s'ajoute en dessous a chaque saisie.je souhaiterai que les données saisies se mettent dans l'ordre alphabétique automatiquement.J'ai fait divers recherches dans les forum mais je n'ai pas réussi a mettre en application ce que j'ai trouvé.Le souci viens en fait de la sélection qui varie a chaque donnée ajoutée.Si quelqu'un peut m'aider ce serait sympa merci d'avance.
j'ai créé un tableau excel a deux feuil.sur la feuil1 j'ai créé un formulaire de saisi classique qui ajoute les données sur la feuil2 en A1 et B1 .la colonne a répertorie une ville et la B un parcours.par exemple en A1 "paris" et en B1 "bords de la seine". Les données saisie dans le formulaire Userform s'ajoute en dessous a chaque saisie.je souhaiterai que les données saisies se mettent dans l'ordre alphabétique automatiquement.J'ai fait divers recherches dans les forum mais je n'ai pas réussi a mettre en application ce que j'ai trouvé.Le souci viens en fait de la sélection qui varie a chaque donnée ajoutée.Si quelqu'un peut m'aider ce serait sympa merci d'avance.
A voir également:
- Tri vba
- Tri excel - Guide
- Logiciel tri photo gratuit - Guide
- Mkdir vba ✓ - Forum VB / VBA
- Excel compter cellule couleur sans vba - Guide
- Vba range avec variable ✓ - Forum VB / VBA
4 réponses
PlacageGranby
Messages postés
393
Date d'inscription
mercredi 26 mars 2014
Statut
Membre
Dernière intervention
7 mars 2019
26
Modifié par PlacageGranby le 31/10/2014 à 13:39
Modifié par PlacageGranby le 31/10/2014 à 13:39
Mon erreur
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
PlacageGranby
Messages postés
393
Date d'inscription
mercredi 26 mars 2014
Statut
Membre
Dernière intervention
7 mars 2019
26
Modifié par PlacageGranby le 30/10/2014 à 15:38
Modifié par PlacageGranby le 30/10/2014 à 15:38
Il faudrait ajouter un tri sur le bouton du userform pour trier a chaque ajout.
Si tu a une entête, tu peux trouver la dernière ligne x ayant des données et trier
(Dans cet exemple, ton tableau commence à la 3ieme ligne)
Dim X as integer
X = Cells(3, 1).End(xlDown).Row
Range("A3:B" & X).Select
Selection.Sort Key1:=Range("A"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Modifie le 3 partout pour la ligne ou commence ton tableau
Si tu a une entête, tu peux trouver la dernière ligne x ayant des données et trier
(Dans cet exemple, ton tableau commence à la 3ieme ligne)
Dim X as integer
X = Cells(3, 1).End(xlDown).Row
Range("A3:B" & X).Select
Selection.Sort Key1:=Range("A"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Modifie le 3 partout pour la ligne ou commence ton tableau
raoulmenard
Messages postés
23
Date d'inscription
mardi 28 octobre 2014
Statut
Membre
Dernière intervention
15 mars 2016
31 oct. 2014 à 08:48
31 oct. 2014 à 08:48
raoulmenard
Messages postés
23
Date d'inscription
mardi 28 octobre 2014
Statut
Membre
Dernière intervention
15 mars 2016
3 nov. 2014 à 17:32
3 nov. 2014 à 17:32
Bonjour.
Merci ca fonctionne parfaitement j'ai rajouté la formule que vous m'avez donné sur le bouton "VALIDER" qui permet la saisie de mes données comme ça quand je valide le tri s'effectue automatiquement puis ferme l'userfom
merci pour votre efficacité
Merci ca fonctionne parfaitement j'ai rajouté la formule que vous m'avez donné sur le bouton "VALIDER" qui permet la saisie de mes données comme ça quand je valide le tri s'effectue automatiquement puis ferme l'userfom
merci pour votre efficacité