Alguiche
XLDnaute Junior
Bonsoir à toutes et à tous,
Je voudrais pouvoir faire une mise à jour de mon graphique par macro, mais je n'arrive pas à trouver la bonne formulation pour inclure ma variable dans le range (voir module3).
J'ai essayé comme ça mais il bogue...
Sub MaJGraph()
Dim Dercel As Range
Range("A1").Select
Set Dercel = Rows(12).Find(what:="", LookIn:=xlValues)
ActiveSheet.ChartObjects("Graphique 1").Activate
ActiveChart.PlotArea.Select
ActiveChart.SetSourceData Source:=Sheets("StatsM05_06").Range("A3:" & Dercel), _
PlotBy:=xlRows
Range("A3").Select
End Sub
Merci à celle ou celui qui pourra me donner une solution
Al
Je voudrais pouvoir faire une mise à jour de mon graphique par macro, mais je n'arrive pas à trouver la bonne formulation pour inclure ma variable dans le range (voir module3).
J'ai essayé comme ça mais il bogue...
Sub MaJGraph()
Dim Dercel As Range
Range("A1").Select
Set Dercel = Rows(12).Find(what:="", LookIn:=xlValues)
ActiveSheet.ChartObjects("Graphique 1").Activate
ActiveChart.PlotArea.Select
ActiveChart.SetSourceData Source:=Sheets("StatsM05_06").Range("A3:" & Dercel), _
PlotBy:=xlRows
Range("A3").Select
End Sub
Merci à celle ou celui qui pourra me donner une solution
Al