IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Triez les données d'une feuille


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau candidat au Club
    Profil pro
    Inscrit en
    Août 2007
    Messages
    1
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Août 2007
    Messages : 1
    Par défaut Triez les données d'une feuille
    Bonjour tout le monde,

    j'ai besoin donc d'une petite aide afin de créer une macro de tri. Je vous explique:

    Un pote souhaite qu'a chaque ajout de données un tri automatique se fasse (sans appuye de boutons ou autres). Le tableur de presente de la manierez suivante (en gros )

    A B C

    date1 100 40
    date2 150 60
    date3 15 5

    ... ... . ....

    Il souahiterai donc que cela soit trié par ordre croissant ou decroissant grace a la colonne 1 et que les data des colonnes B & C corespondent biensur

    Merci pour votre aide

    en esperant avoir été clair

  2. #2
    Membre confirmé
    Profil pro
    Inscrit en
    Mars 2006
    Messages
    201
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2006
    Messages : 201
    Par défaut
    tu lance l'éditeur de macro tu sélectionne tes données tu va dans Menu->Données->trier

    tu met trier par ColonneA

    et tu enregistre ta macro.

    Cela te crée le code automatiquement. Ensuite tu le met dans l'évenement Change de ta feuille.

    Du style :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
     
    Private Sub Worksheet_Change(ByVal Target As Range)
         Range("A1:F13").Select
        Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
            OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
    End Sub

Discussions similaires

  1. Réponses: 0
    Dernier message: 27/11/2007, 22h59
  2. Réponses: 3
    Dernier message: 04/10/2007, 12h00
  3. Réponses: 3
    Dernier message: 31/01/2007, 17h46
  4. Réponses: 2
    Dernier message: 16/10/2006, 11h24
  5. Importer les données d'une feuille EXCEL
    Par codial dans le forum Bases de données
    Réponses: 4
    Dernier message: 05/02/2006, 09h07

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo