Salut !

J'ai presque fini mon projet, j'ai fait un fichier excel qui contient sur une premiere feuille des données d'entreprises datées, et sur une 2e, un module de statistique qui trie par mois, ou par date custom avec un form qui choisit les mois a ajouter pour enfin générer un graphique. Le truc c'est qu'on peut générer autant de graphiques qu'on veut, mais ils s'empilent tous et ca c'est mal  

J'ai donc essayé de taper :

Cells(1, 10).Value = ActiveChart.ChartArea.Name dans la fonction de création de graphique

puis ActiveSheet.ChartObjects(Cells(1, 10).Value).Activate
ActiveChart.ChartArea.Select
ActiveWindow.Visible = False
Selection.Delete sur mon bouton "ok" de mon form de création de graphique.

Ca devrait avoir pour but de détruire le graphique précédent avant de créér le nouveau. Mais ca marche pas. Le message d'erreur renvoyé est :
Impossible de lire la propriété ChartObjects de ActiveSheet

J'ai essayé de feinter par tout les cotés, mais je trouve pas
Pitié, aidez moi a supprimer ce #@$° de graphique !

up

bonjour,
essaie :
Dim Chaine$
...
Chaine = Cells(1, 10).Value
ActiveSheet.ChartObjects(Chaine).Activate
 
A+