Bonjour

C'est tout à fait possible avec une macro VBA.

Le tableau que tu veux trier, tu le nommes "infos"

la cellule titre de la 1ère colonne de tri est nommée "col1"

la cellule titre de la 2ème colonne de tri est nommée "col2"

la cellule titre de la 3ème colonne de tri est nommée "col3"

tous ces noms sont des exemples utilisés dans la macro bien sûr !


tu mets cette macro dans la feuille concernée et
dès qu'une cellule change de valeur le tableau est trié.

Private Sub Worksheet_Change(ByVal adrcel As Range)
Range("infos").Sort Key1:=Range("col1"), Order1:=xlAscending, _
Key2:=Range("col2") , Order2:=xlAscending, _
Key3:=Range("col3"), Order3:=xlAscending, _
Header:= xlYes, OrderCustom:=1, MatchCase:=False, _
Orientation:=xlTopToBottom
End Sub

il est bien évident que c'est un exemple qui fonctionne
mais il peut être amélioré en vérifiant que la cellule modifiée
fait bien partie du tableau par exemple.


toujours zen

Bonjour,
C top merci

Bonjour,je vois dans ce forum,la solution à un problème identique à celui que je cherche à résoudre,mais la solution proposée,je n'arrive pas à la mettre en application !
Il s'agit de la macro proposée par gbinforme ,le mardi 25 janvier 2005,figurant dans le forum "tri automatique sur Excel"
Pourrait-on me donner la marche à suivre pour appliquer cette macro sur Excel 2007 ?
Merçi à l'âme charitable qui voudra bien se pencher sur mon problème.

Bonjour bremic83,

Une macro "automatique" de tri doit être adaptée à ton classeur :

- que veux-tu trier ? une base de données structurée avec les rubriques en ligne 1 ?

- une partie de feuille de classeur ?

- sur combien de rubriques veux-tu trier ?

- as-tu déjà utilisé des macros ?
Toujours zen

Bonjour

La dernière contient les noms des lignes,et c'est cette liste de noms que je trie en ordre décroissant,selon les performances

Je suppose que le tri décroissant se fait en fonction du total (colonne précédente) et non sur le nom car celui-ci ne doit pas varier ?
Toujours zen

Bonjour

je suis loin d'avoir pigé le processus

Ce n'est pas forcément évident mais le principe est simple en mettant un module de tri paramétré au niveau d'excel et en interceptant l'événement d'une saisie dans une cellule pour le lancer depuis n'importe quel classeur.
Toujours zen

Bonjour

je n'ai pas pu continuer,n'ayant pas trouvé :C:\Documents and Setting\ et la suite .

Tu es sous XP ou Vista ?

en changeant à chaque le n° de ligne

Le numéro de ligne doit rester le même car il n'est là que pour permettre de sauter les premières lignes si tu as un en-tête qui ne doit pas bouger et que le tableau à trier commence en ligne 8 par exemple. Tu peux aussi trier à partir de la colonne D (4) si tu précises le paramètre qui est implicitement 1 (A) :
retour = Run("trier", 1, "H", "D", 4)

Si par exemple tu as :
colonne A nom
colonne B prénom
colonne C age

Pour trier sur age , nom , prénom tu vas mettre les 3 lignes dans l'ordre inverse :

    retour = Run("trier", 1, "B", "A")
    retour = Run("trier", 1, "A", "A")
    retour = Run("trier", 1, "C", "D")

Bonjour

Dans ce cas il faut regarder dans c:\users\ etc

mais je n'ai pas vista.
Toujours zen

Bonjour

a priori il faut libérer les fichiers systèmes :
Démarrer/Ordinateur et avec la touche Alt. afficher la barre d’outils en haut de la fenêtre
Menu Outils/Options des dossiers et onglet Affichage
décoches les cases
- Masquer les extensions des fichiers dont le type est connu
- Masquer les fichiers protégés du système d’exploitation
Toujours zen

Bravo tu as fait vite.
J'avais trouvé cette solution sur le forum,je l'ai essayée sans résultat,à chaque fois que je veux ouvrir le dossier,je fais apparaitre la même fenêtre " dossier indisponible accès refusé "
J'ai voulu en essayer une autre:" INPLACE $.~dossier TR " mais je n'arrive pas à trouver le mode d'emploi !
D'ailleurs,je ne sais pas si elle serait valable dans mon cas .
La galère continue .
Comment fais tu pour rester toujours zen ?
A plus !
Bremic83

Bonjour

As-tu regardé ceci :
http://www.commentcamarche.net/faq/sujet 6604 vista s approprier un fichier dont l acces est refuse
Toujours zen

Bonjour

je voudrais la transférer dans le dossier "Documents and Settings"

Attention il me semble que sur Vista ce répertoire est remplacé par "users"

Ensuite tu devrais trouver "Application Data\Microsoft\Macros complémentaires"
Toujours zen

Bonjour

quand je veux exécuter: Message d'erreur suivant:
"paramètre de tri incorrect".

Tu n'as pas dû lire totalement le message d'erreur car il manque le mot important du message.

Si tu en es arrivé là, c'est très bien car tu as installé ta macro complémentaire et il ne manque qu'une correction aux paramètres : ce devrait être simple.

Si tu pouvais faire un copier/coller de la macro de ton classeur, je pourrais d'aider plus facilement.

Je suis peut-être trop ambitieux pour un débutant

Sûrement pas car si tu n'avais pas aussi été un peu ambitieux pour marcher tu serais toujours assis : il faut bien se lancer et utiliser les outils disponibles surtout lorsqu'ils facilitent la tache.
Toujours zen

Bonjour

Dans ton paramètre sens de tri, il y a un espace avant le D et comme la macro attend A ou D...

C'est pas méchant, cela va fonctionner mais il faudrait enlever l'apostrophe devant "private".
Toujours zen

Bonjour

Dans la feuille VBA que tu veux trier, tu ne dois avoir que ceci :

Private Sub Worksheet_Change(ByVal Target As Range)
     Dim retour
     retour = Run("trier", 1, "E", "D")
End Sub 

Bonjour

Tu es probablement avec 2007 et donc avec le bouton Office en haut à gauche, il faut choisir enregistrer sous puis choisir "classeur excel prenant en charge les macros" et tu auras un fichier .xlsm

Dès que tu introduis les macros il faut cette extension.
Toujours zen

OK tu es mon sauveur,MERCI

A plus.

Bremic83

Bonjour,

Je reviens sur le tri automatique dans Excel 2007.

Cela fonctionne bien, toutefois le problème que je rencontre est que je ne veux trier une copie de mon tableau d'origine. Mon tableau à trier contient donc les références aux cellules où sont saisies les données, et là la macro ne fonctionne plus.

Exemple :

Valeurs saisies en A1:A30
Cellules G1:G30 égale la plage A1:30 et je veux trier la plage G1:G30

La seule solution que j'entrevois serait de rajouter au début de cette macro, un copier/coller des valeurs de ma colonne A en colonne G, mais je ne sais pas le faire en VBA.

Après il y a peut-être une meilleure solution ?