Je comprends pas mon erreur

[Phil_PF]

Bonjour,

Je veux créer un graphe par VBA, mais il y une erreur et je vois pas ce qu'il ne lui plait pas

Code qui marche :
Charts.Add
ActiveChart.ChartType = xlXYScatter
ActiveChart.SetSourceData source:=Sheets(NomF).Range("K2:L145"), PlotBy:=xlColumns

Et celui qui ne marche pas :

ActiveChart.SetSourceData source:=Sheets(NomF).Range(Cells(2, 11), Cells(145, 12)), PlotBy:=xlColumns

C'est quoi mon erreur ?

 

[RENAUDER]

Re : Je comprends pas mon erreur

Bonjour,
Essaies ceci

........
[COLOR=Red]Set Plg=Sheets(NomF).Range(Cells(2, 11), Cells(145, 12))[/COLOR]
Charts.Add
    ActiveChart.ChartType = xlXYScatter
    ActiveChart.SetSourceData source:=[COLOR=Red]Plg[/COLOR], PlotBy:=xlColumns

 

[job75]

Re : Je comprends pas mon erreur

Bonsoir,

Il faut définir la feuille pour les Cells :

ActiveChart.SetSourceData source:=Sheets(NomF).Range(Sheets(NomF).Cells(2, 11), Sheets(NomF).Cells(145, 12)), PlotBy:=xlColumns

ou

With Sheets(NomF)
ActiveChart.SetSourceData source:=.Range(.Cells(2, 11), .Cells(145, 12)), PlotBy:=xlColumns
End With

Edit : salut Eric

A+

 

[Phil_PF]

Re : Je comprends pas mon erreur

Merci beaucoup

mais c'est peut-être pas fini ...

Bon WE