Insérer un graphique dans excel

A

Aurore

Guest
Bonjour,

J'ai trouvé le code pour insérer un graphique dans une feuille excel.
Cependant je n'arrive pas à placer le graphique aux coordonnées que je choisit

Pourriez vous m'aider à résoudre ce problème
Merci
 
A

Aurore

Guest
Bonjour,

Voici le code

Columns("D:E").Select
Set Graph = Charts.Add

Graph.ChartType = xlXYScatterSmooth
Graph.SetSourceData Source:=Sheets("Feuil1").Range("D4:E43"), PlotBy:=xlColumns
Graph.Location Where:=xlLocationAsObject, Name:="Feuil2"


Le problème c que ma feuille est partagée en 4 et j'aimerais pouvoir faire apparaitre le graphique dans la zone que je désire
Est ce possible?
 
A

albert

Guest
bonsoir Aurore, une panne adsl ne m'a pas permis de répondre rapidement

fais un essai avec ce code qui utilise des décalages à régler selon tes besoins (tu renommes les feuilles et les plages, bien entendu)

si je trouve le temps, j'essaie d'envoyer un zip

Sheets(3).Select
Set Plage = .Range("A2:C2", .Range("A2:C2").End(xlDown))
End With
Set Graphe = Worksheets("Statistiques").ChartObjects.Add(350 + Decalage, 50 + Decalage, 400, 220)
With Graphe.Chart
.ChartType = xlXYScatter
.SeriesCollection.Add Plage, xlColumns, True, True
End With
Decalage = Decalage + 20
End If
 

Statistiques des forums

Discussions
314 083
Messages
2 105 562
Membres
109 387
dernier inscrit
Thaliemandarine