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 :

Récupérer la Source pour la création d'un graphique


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Homme Profil pro
    Ingénieur Logistique
    Inscrit en
    Octobre 2013
    Messages
    104
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Ingénieur Logistique
    Secteur : Transports

    Informations forums :
    Inscription : Octobre 2013
    Messages : 104
    Par défaut Récupérer la Source pour la création d'un graphique
    Bonjour à tous,

    J'ai un nouveau petit problème dans la création de graphiques cette fois-ci, voici mon code :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
            NomDonnee = "Graph" & i
            ActiveSheet.ChartObjects(ActiveChart.Parent.Name).Name = NomDonnee
            NomDonnee = "Tableau" & i
            Set SelectionRange = Worksheets(NFDonnees).Range(NomDonnee)
            ActiveChart.SetSourceData Source:=Worksheets(NFDonnees).Range(NomDonnee)
    C'est dans une boucle, raison pour laquelle on utilise un i ici. J'ai toujours un bug sur la dernière ligne (message d'erreur : n°91 Object variable or with block variable not set) sauriez vous me dire pourquoi ?
    Soit dit en passant, il y a bien quelque part dans la feuille NFDonnees une sélection NomDonnee

    Merci d'avance,


    Philippe

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour,
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
            NomDonnee = "Graph" & i
                     ActiveSheet.ChartObjects(ActiveChart.Parent.Name).Name = NomDonnee
                  Set SelectionRange = Worksheets(NFDonnees).Range(NomDonnee)
              ActiveSheet.ChartObjects(NomDonnee).Chart.SetSourceData Source:=SelectionRange

Discussions similaires

  1. Aide pour récupérer code source dans une variable
    Par leumas dans le forum Général JavaScript
    Réponses: 7
    Dernier message: 02/09/2008, 14h03
  2. Norme pour la création des interfaces graphiques
    Par beet2che dans le forum VB.NET
    Réponses: 1
    Dernier message: 28/08/2008, 20h11
  3. Problème pour la création d'un graphique
    Par yabiyou dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 30/01/2008, 15h04
  4. [TWebbrowser] Probléme pour récupérer la source
    Par Gauth dans le forum Web & réseau
    Réponses: 8
    Dernier message: 09/04/2005, 15h57

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