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 :

Graphique -> supprimer les lignes vides en fonction des données remontées [XL-2007]


Sujet :

Macros et VBA Excel

  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Juillet 2003
    Messages
    41
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2003
    Messages : 41
    Par défaut Graphique -> supprimer les lignes vides en fonction des données remontées
    Bonjour,

    Je souhaite la mise à jour automatique d'un graphique en fonction des données remontées.
    Est il possible de faire en sorte que les lignes vides n'apparaissent pas dans le graphique (sachant qu'en fonction des données remontées, j'ai besoin d'une plage de cellule et que cette plage de cellule n'est pas forcément remplie) ?
    Merci
    Cordialement

  2. #2
    Membre éprouvé Avatar de Many31
    Profil pro
    Inscrit en
    Février 2007
    Messages
    198
    Détails du profil
    Informations personnelles :
    Âge : 41
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Février 2007
    Messages : 198
    Par défaut
    Bonjour,

    L'enregistreur de macro est votre ami

    Pour ce que vous souhaitez faire il est parfois plus simple d'ajouter les lignes au fur et à mesure, plutot que de les supprimer...

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    ActiveSheet.ChartObjects("Graphique 1").Activate
        ActiveChart.SeriesCollection.NewSeries
        ActiveChart.SeriesCollection(ActiveChart.SeriesCollection.Count).Values = "=Feuil1!R1C2:R1C15"
        ActiveChart.SeriesCollection(ActiveChart.SeriesCollection.Count).Name = "=Feuil1!R1C1"
    (ActiveChart.SeriesCollection.Count est là pour être sur de sélectionner la dernière courbe ajoutée)
    Supprimer toutes les courbes d'un graphique :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    ActiveSheet.ChartObjects("Graphique 1").Activate
        For Each Courbes In ActiveChart.SeriesCollection
            Courbes.Delete
        Next
    Si vous connaissez l'ordre et que vous voulez en supprimer qu'une seule :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
    ActiveSheet.ChartObjects("Graphique 1").Activate
    ActiveChart.SeriesCollection(1).Delete
    ou le nom de la courbe
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    For Each Courbes In ActiveChart.SeriesCollection
            If Courbes.Name = "Dudu" Then Courbes.Delete
        Next

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Juillet 2003
    Messages
    41
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2003
    Messages : 41
    Par défaut
    Merci Many31. Je vais regarder tout ça !
    du coup, j'avais également posté un autre pb. Peut être que tu as la solution !
    ^^

    Bonjour

    Je souhaite faire un histogramme empilé avec deux séries. Jusque là pas de pb.
    En revanche, je souhaite ajouter une ligne horizontale correspondant à un chiffre.
    Je n'arrive pas à le faire que ce soit en barres d'erreur, courbe de tendance.

    Est ce que quelqu'un aurait ma solution ?

  4. #4
    Membre éprouvé Avatar de Many31
    Profil pro
    Inscrit en
    Février 2007
    Messages
    198
    Détails du profil
    Informations personnelles :
    Âge : 41
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Février 2007
    Messages : 198
    Par défaut
    Oui aussi.

    pour faire propre il est plus simple de créer une ligne dans votre tableau avec une valeur constante et de rajouter une série.
    Ensuite sélectionnez la série, clique droit => Type de graphique => Courbes.

    Pour avoir la retranscription VBA activez l'enregistreur de macro.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 1
    Dernier message: 12/12/2006, 12h00
  2. Supprimer les lignes vides d'un document Word
    Par Jerfa dans le forum VBA Word
    Réponses: 4
    Dernier message: 28/08/2006, 16h12
  3. Réponses: 2
    Dernier message: 04/05/2006, 13h10
  4. supprimer les lignes vides?
    Par VinnieMc dans le forum Langage
    Réponses: 5
    Dernier message: 27/02/2006, 14h01

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