Excel Chart - Extending Range

[celeron895]

Hello:

I am working with an Excel sheet that is used to produce a chart. I have a macro that inserts a new column into the chart. I then need to add that column into the data that is being represented on the chart. A new column will be inserted each day. Any ideas? I have tried using the seriescollection extend method, but to no avail.

 

[Loomah]

Hi
I've just managed to use the following successfully on a simple 1 series bar chart

Sub Add_to_Series()
Dim iCol As Integer
iCol = Worksheets("Sheet1&quot.Range("A1&quot.CurrentRegion.Columns.Count
Sheets("Chart1&quot.Select
ActiveChart.SeriesCollection(1).Formula = _
"=SERIES(,Sheet1!R1C1:R1C" & iCol & ",Sheet1!R2C1:R2C" & iCol & ",1)"
ActiveChart.Deselect
End Sub

;-) If a man says something and there are no women there to hear him, is he still wrong?
"...Three Lions On A Shirt..."