comment nommer un graph

[arno]

bonjour
je n arrive pas en vba a creer un programme qui me supprime des graph. je pense que ceci est du au fait que je ne nomme pas correctement les graph. si vous pouvez m aider a realiser ce programme ou juste a renommer mes graph merki beaucoup.

 

[AV]

Ave,

Pour parcourir ET supprimer tous les graphiques de 'Feuil1' :

Sub zz_Graph()
With Sheets('Feuil1')
For i = 1 To .ChartObjects.Count
.ChartObjects(i).Delete
Next
End With
End Sub

AV [MVP Excel]

 

[Hervé]

re arno, bonjour av

pour la suppression des graph, j'ai aussi appporté une réponse ici :

Lien supprimé

pour les renommer, comme ceci, par exemple :

Sub Bouton3_QuandClic()
Dim i As Integer

With ActiveSheet
For i = 1 To .ChartObjects.Count
.ChartObjects(i).Name = 'toto' & i
MsgBox .ChartObjects(i).Name 'pour test
Next i
End With

End Sub

edition : une autre syntaxe pour la suppression de tous les graph d'une feuille :

ActiveSheet.ChartObjects.Delete


salut

Message édité par: hervé, à: 03/04/2006 12:07

 

[arno]

merci bcp ca marche trop bien. cependant un fenetre s'affiche pour que je confirme l elimination du graph. y a t il un moyen de la zapper
encore merci

 

[Hervé]

re arno, av

je ne sais pas à qui tu t'adresses, mais normalement pour la suppression d'un graphique sur une feuille, il n'y a pas de message de confirmation.

Si tu a un message c'est que ton graphique est placé qur une feuille et non en tant qu'objet de la feuille active.

et dans ce cas, je crois que les macros que l'on t'a proposés ne conviennent plus.

sinon, place en début de code :

application.displayalerts=false

et en fin de code

application.displayalerts=true

salut

 

[romain3378@hotmail.fr]

Re : Re:comment nommer un graph

salut a tous,

Y'aurait-il quand meme un moyen de renommer un graph, ou de lui attribuer un nom lors de sa creation via macro?

Merci