modify ms-chart graphic legend

[chrtophe]

Hello,

I'm trying to change the text legend in a Graphic.

Here's my code :

Dim vlChart As Graph.Chart
Set vlChart = Me.Graphique2.Object.Application.Chart
Dim vlegend As Legend
Set vlegend = vlChart.Legend

MsgBox "before modification " + vlChart.Application.DataSheet.Range("A0").Value
vlChart.Application.DataSheet.Range("A0").Value = "test"
MsgBox "after modification " + vlChart.Application.DataSheet.Range("A0").Value

vlChart.Refresh
Me.Requery
Me.Refresh

The refreshes don't work.

The MsgBox return the good result after modification, but the graph display keeps the original legend title.

I tried with Legend.LegendEntries(0) without result i don't if it's possible.

Thanks for your help and sorry for my english level, i'm french.

[rpeare]

did you try sticking

vlchart.application.update

after you set the value?

[June7]

You are doing this in Excel?

I have code behind Access form that modifies properties of graph. Doesn't require Refresh or Update. However, Legend is not one I've tried. Most of my graphs are designed without a legend anyway.

[chrtophe]

vlchart.application.update makes no change.
June, i'm making it under Access. I'have read this method is ok but i'm not sure of the source.
I don't undrerstand
Is there another method than DataSheet.Range to access the legend ?
Thanks for your answers

[June7]

You are using code that applies to spreadsheet and has nothing to do with Access structure. So exactly where is this graph?

[chrtophe]

This graph is in a Access Form, his contents come from an access query. this query is calculated from others querys ( in case of link with my problem ).
I'm ok with a other way, with .Legend for example but i did'nt arrived. I saw samples to modify font, color, etc... but not text.

[June7]

At first, that code looked like it referenced a spreadsheet but now I see it's actually referencing the chart datasheet. I have never done code to do that.

Not sure what you want. The legend is based on data. Why would you want to change the legend labels?

[chrtophe]

I want to change the legend label refering to the year, my graphics curses represents data of the current year and data of the last year. I want to display the legend text containing the year without to have to change legend next year.

[June7]

The legend labels are based on series names generated by the chart RowSource query. I don't think they can be changed programmatically. Restructure the query.

Perhaps if you provided examples by images or attached db, could analyse and find a solution.

[chrtophe]

I think i have a solution ( i'have not tested yet ).
Il will retrieve the ms-chart rowsource, change title with As in the SQL request, and change the rowsource. i will tell you if it's ok.