Conflit entre macro pour création Graphique

CarineDere

XLDnaute Nouveau
Bonjour à tous,

2ème post du jour pour mes problèmes de macro, encore une fois !

Mon souhait : 1 macro par matrice (ensemble de données) pour créer automatiquement mes graphs en nuage de point (1 graph par matrice)

Pour la première matrice (colonne 1 à 3), tout va bien, je crée mon graphique avec le nom que je veux

Pour la deuxième matrice (colonne 5 à 7) seule : fonctionne très bien...
Par contre, lorsque la macro pour la matrice 1 est déjà faîte... les données de la deuxième matrice viennent dans le graph de la matrice 1 ...

Voilà je suis bloquée et compte sincèrement sur vous !
Le fichier est en pièce joint, ce sera plus clair !

Merci par avance !
 

Pièces jointes

  • CarineD .xlsm
    25.9 KB · Affichages: 45

Paf

XLDnaute Barbatruc
Re : Conflit entre macro pour création Graphique

Bonjour

le soucis vient de ces lignes de code utilisées pour nommer les graphes:
Feuil1.ChartObjects(1).Name = "Matrice 1" et Feuil1.ChartObjects(1).Name = "Matrice 2"

1 étant le "numéro" du graphe, lors de la création du second graph, c'est le premier existant qui est renommé.

Une solution possible: compter le nb de graphes existants et attribuer ce nombre au dernier créé

Num = ActiveSheet.ChartObjects.Count
Feuil1.ChartObjects(Num).Name = "Matrice 1"

et
Num = ActiveSheet.ChartObjects.Count
Feuil1.ChartObjects(Num).Name = "Matrice 2"


A+

Edit : Correction fautes de "frappe"
 
Dernière édition:

CarineDere

XLDnaute Nouveau
Re : Conflit entre macro pour création Graphique

Bonjour Paf,

Merci d'avoir répondu...

Par contre avec tes lignes, ça beug toujours (mes compétences dans le domaine étant limitées... ça n'arrange rien).

Il y a problème sur la ligne Feuil1.ChartObjects(Num).Name = "Matrice 1" et le graphique se créé sur une nouvelle feuille au lieu de rester sur la feuille active Feuil1....

une idée?

Merci par avance !!
 

CarineDere

XLDnaute Nouveau
Re : Conflit entre macro pour création Graphique

Attention ...

J'ai trouvé la solution !!

En modifiant ma macro et en implantant la ligne :

ActiveSheet.ChartObjects(ActiveSheet.ChartObjects.Count).Name="Matrice 2"

Et voilà, ça vient renommer le dernier Graphique créé ..!

Merci pour votre aide ;) !
Carine D.
 

Discussions similaires

Statistiques des forums

Discussions
299 850
Messages
1 979 570
Membres
206 780
dernier inscrit
Edwige81