VBA Excel déplacer un graphiqe avec une macro

Bonjour,

J'ai vu qu'on pouvait déplacer un graphique avec la commande

Code:

---

ActiveSheet.Shapes("Graphique 1").IncrementLeft 357.75

---

En argument je pense que c'est le nom du graphique mais je ne suis pas sur :(

Donc j'ai essayé de prendre le nom du graphique et de le passer en argument mais ça ne marche pas :(

Code:

---

1 2	nom_graph = ActiveChart.Name ActiveSheet.Shapes(nom_graph).IncrementLeft 357.75

---

Erreur : L'élément portant ce nom est introuvable ...

Donc apparement ce n'est pas le nom qui est en argument mais je ne sais pas ce que le "Graphique 1" représente :( Il n'y a pas de Id ou autre donc si quelqu'un connaissait cet argument ....

Merci

Bonjour,
Pourquoi veux tu avoir le nom du graphique en variable ?
Quel est ton but final?

Si tu as plusieurs Graph à bouger sache que tu peux remplacer le nom par son "numéro", tu n'as donc pas besoin de connaitre son nom, le code ci-dessous correspond au premier code de ton post.

Code:

---

ActiveSheet.Shapes(1).IncrementLeft 357.75

---

Est-ce qeu ça t'aide?
PS: Je sais pas comment on récupère le nom d'un graph...