création d'un graphe via macro excel

Bonjour ,

Je souhaite créer un graphe via une macro Excel, au lieu d'obtenir un joli graphe dans l'onglet "graphe attendu" j'ai un graphique avec des boules vertes et rouges :cry: J'ai un erreur d'execution - 214 7024 809 (80070057)"l'élément portant ce nom est introuvable"

Quelqu'un peut-il m'éclairer???

Merci!!

c'est

Code:

---

ActiveChart.ChartType = xlBubble3DEffect

---

qui te donne des bulles

ce que je fais moi
je crée mon graphe à la main en enregistrant la macro
puis
je fais mon programme en tenant compte de ce qui a été enregistré

courage

merci Patnel de ta réponse!!
j'enregistre une macro en créant le graphique et dc le programme donne bien le graphique 3D je retrouve bien la ligne

Code:

---

ActiveChart.ChartType = xlBubble3DEffect

---

il ne reconnait "graphique 1"
mais il ne prend pas en compte mes données et de plus je ne sais pas programmer !!!

quel type de graphe tu veux obtenir ?

si tu ne sais pas programmer ça va être dur
reprend le tutoriel sur VBA dispo dans le site

J'ai enregistré la macro ! ca pas de probleme!! est ce que tu as regarde ma piece jointe? car l'erreur dans le code est au niveau de la selection d'un graphique q'il ne reconnait pas!

sur le premier onglet, c'est le graphe que j'obtiens apres execution de la macro alors que le graphe que je veux est ds le 3 eme onglet!
Merci de ton aide

effectivement j'avais pas tout vu
donc comment as tu obtenu le graphe que tu veux ?
car si ti prends tout le tableau comment les données n'ont pas la même échelle, car les nombres ne sont pas de même nature
c'est normal que tu obtiennes ce que tu as
si tu ne prends que l'échelle de température ça devrait aller mieux.

OUps en effet, c'est pas tres clair pour le graphe que je veux je prends les colonnes B , C et D et apres je modifie l'echelle et les axes!! en fait c'est le temps des operations (colonne D) en fonction des colonnes B et C!!

bon si tu sais le faire à la main, je veux dire modifier les echelles des axes, fais le en enregistrant la macro
en fait tu enregistres tout ce que tu modifies

attention il faut détruire le graphe existant avant de relancer ta macro sinon ça plante

il ya une primitive qui plante dans ton code

Code:

---

ActiveChart.SetElement (msoElementPrimaryCategoryGridLinesMajor)

---

je ne sais pas pourquoi

OUi le changement c'es bon!
ar contre moi j'ai une erreur à cette ligne

Code:

---

ActiveSheet.ChartObjects("Graphique 1").Activate

---

je ne sais pas pourquoi non plus:?

c'est parce que tu n'es pas sur la bonne page
fais

Code:

---

sheet("mafeuille").activate

---

où ma feuille est la page où tu veux que le graphe y soit

help!! mon graphique n'est toujours pas bon !! je ne comprends pas pourquoi c'est toujours la meme erreur!!

quelle erreur ?

avant de lancer ta macro pointe sur la bonne page et détruis le graphe existant

c'est la meme erreur qu'au debut! ( l' élément portant ce nom est introuvable) j'ai bien supprime le graphe et je pointe sur la feuille ou je veux que le graphe y soit!

la discussion est un peu longue pour ce forum.
si tu veux, passes par ma messagerie
patrick dot brunel at fr dot thalesgroup dot com

on va essayer de faire un peu plus vite car ton PB n'est pas trés compliqué
j' ai refais ton graphe en enregistrant la macro j'obtiens à peu prés ce que tu veux

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

Sub Macro1() ' ' Macro1 Macro ' Macro enregistrée le 02/04/2010 par a362584 '   ' Charts.Add ActiveChart.ChartType = xlBubble ActiveChart.SetSourceData Source:=Sheets("Données sources").Range("B2:D9"), _ PlotBy:=xlColumns ActiveChart.Location Where:=xlLocationAsObject, Name:="Données sources" With ActiveChart .HasTitle = True .ChartTitle.Characters.Text = "toto" .Axes(xlCategory, xlPrimary).HasTitle = False .Axes(xlValue, xlPrimary).HasTitle = False End With End Sub

---

je suis en congés à partir de midi