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 :

décliner graph VBA/macro


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
    Homme Profil pro
    Administrateur de base de données
    Inscrit en
    Juin 2020
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 37
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Administrateur de base de données

    Informations forums :
    Inscription : Juin 2020
    Messages : 1
    Par défaut décliner graph VBA/macro
    Bonjour,

    Je cherche à développer une macro qui permet à partir d'un graphique modèle contenant 2 courbes de :

    Macro 1 :
    Dupliquer 5 fois le graph afin d'obtenir les 5 versions suivantes :
    - Version 1 : Courbe 1 uniquement
    - Version 2 : Courbe 2 uniquement
    - Version 3 : Lignes des axes X et Y uniquement
    - Version 4 : Valeurs des axes X et Y uniquement
    - Version 5 : traits du quadrillage prinicpal Y uniquement
    Puis idéalement exporter les images de chaque version dans un dossier.

    ----------

    Macro 2 :
    Supprimer les versions crées (afin de pouvoir refaire macro 1)

    -----------

    Sans faire du code VBA parfait, mais en utilisant l'enregistrement "macro", je suis parvenu jusqu'à présent à dupliquer mon graphs 5 fois tout en masquant à chaque fois les éléments qui ne doivent pas apparaitre sur chaque version. Par contre la ligne de code ci-dessous, pour masquer les valeurs des axes X et Y bugg à chaque fois... (bien qu'elle provienne d'un code généré par l'enregistreur macro)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ActiveChart.Axes(xlCategory).Format.TextFrame2.TextRange.Font.Fill.Visible = msoFalse
    Sur l'exemple joint, j'ai mis en rouge les valeur que je n'arrive pas à masquer...

    Un grand merci d'avance pour celui qui pourra m'aider à régler ce bugg et/ou optimiser cette macro !!!

    Anthony
    Fichiers attachés Fichiers attachés

  2. #2
    Expert confirmé
    Homme Profil pro
    retraité
    Inscrit en
    Juin 2012
    Messages
    3 418
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : retraité
    Secteur : Associations - ONG

    Informations forums :
    Inscription : Juin 2012
    Messages : 3 418
    Par défaut
    Bonjour,

    Pour ma version d'Excel, 2010, "FullSeriesCollection" n'existe pas et est à remplacer par "SeriesCollection". En exécutant la "mise en forme" de chaque graphique immédiatement après sa création (duplication) le code fonctionne, et plante et si l'on fait d'abord toutes les copies avant de les mettre en forme une à une ?!

    Cordialement.
    Fichiers attachés Fichiers attachés

Discussions similaires

  1. executer une requête en VBA : macro ou pas ?
    Par Cantalou dans le forum Requêtes et SQL.
    Réponses: 13
    Dernier message: 26/01/2007, 14h35
  2. [VBA]Macro d'impression automatique
    Par olivier45fr dans le forum SDK
    Réponses: 5
    Dernier message: 27/11/2006, 11h04
  3. [VBA]Macros sous BO Reporter 5.1.8
    Par dieu08 dans le forum SDK
    Réponses: 10
    Dernier message: 11/10/2006, 15h46
  4. [VBA]macro Word avec données de MySQL
    Par Taz_8626 dans le forum VBA Word
    Réponses: 3
    Dernier message: 17/07/2006, 11h39
  5. Graphe et Macro et Excel et VBA
    Par life is magic dans le forum Macros et VBA Excel
    Réponses: 20
    Dernier message: 18/11/2005, 17h24

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