[I]Bonjour,
J'aimerais à partir d'un tableau de valeurs, créer plusieurs graphiques sur une même feuille Excel.
En cliquant sur un bouton de controle pour chaque graphique (bouton1--> graph1 ; bouton2-->Graph2....)
les boutons étant au dessus de chaque graphique.
Le problème que j'ai c'est que je n'arrive pas à nommer un graphique, je n'ai pas trouver sur VBA.
mon code est le suivant : pour un 1er bouton
Set graph = Worksheets("Saisie").Chartobje cts.Add(50, 420, 350, 210) 'gauche, haut, largeur du graph, hauteur
graph.Chart.ChartWizard Source:=Worksheets("Saisie").R ange("B12:B15,D12:K15"), _
Title:="Tri2", PlotBy:=xlColumns 'PlotBy colonne permet d'avoir les jours sur le graph
pour un 2ème bouton : idem
Set graph = Worksheets("Saisie").Chartobje cts.Add(450, 420, 350, 210) ' gauche, haut, largeur du graph, hauteur
graph.Chart.ChartWizard Source:=Worksheets("Saisie").R ange("B12,D12:K12,B16:B18,D16: K18"), _
Title:="Tri3", PlotBy:=xlColumns 'PlotBy colonne permet d'avoir les jours sur le graph
Ce code marche mais les graphiques se superposent qd je clique une 2ème fois sur le bouton
j'avais tenté ce code ci dessous:
For Each graph In Sheets("Saisie").Chartobjects
graph.delete
Next
mais il efface les autres graphiques aussi....
En espérant avoir été assez clair , pouvez vous m'aider?
Marc
-----