[VBA] Suppression d'un graphique Excel

Suppression d'un graphique Excel [VBA] - VB/VBA/VBS - Programmation

Marsh Posté le 26-04-2006 à 11:44:21    

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  :o

 

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 !

Reply

Marsh Posté le 26-04-2006 à 11:44:21   

Reply

Marsh Posté le 27-04-2006 à 08:33:39    

up [:angefox]


Message édité par kennybis le 27-04-2006 à 08:33:50
Reply

Marsh Posté le 27-04-2006 à 09:15:37    

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


---------------
roger
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed