| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Updating Series Data for chart based on variable.
I'm trying to have VBA change the ranges for a chart based on the last row in
a set of data. The row number has been set to "i". I already have Dim i as long at the beginning of my macro My code looks like this: Sheet6.ChartObjects("Chart 1").Activate With ActiveChart .SeriesCollection(1).Value = Sheet1.Range("$CH$17:$CH$" & i) .SeriesCollection(1).XValues = Sheet1.Range("$I$17:$I$" & i) .SeriesCollection(2).Value = Sheet1.Range("$CG$17:$CG$" & i) .SeriesCollection(2).XValues = Sheet1.Range("$I$17:$I$" & i) .SeriesCollection(3).Value = Sheet1.Range("$CF$17:$CF$" & i) .SeriesCollection(3).XValues = Sheet1.Range("$I$17:$I$" & i) End With I've also tried to do it like this: Sheet6.ChartObjects("Chart 1").SeriesCollection(1).Value = Sheet1.Range("$CH$17:$CH$" & i) Sheet6.ChartObjects("Chart 1").SeriesCollection(1).XValues = Sheet1.Range("$I$17:$I$" & i) Sheet6.ChartObjects("Chart 1").SeriesCollection(2).Value = Sheet1.Range("$CG$17:$CG$" & i) Sheet6.ChartObjects("Chart 1").SeriesCollection(2).XValues = Sheet1.Range("$I$17:$I$" & i) Sheet6.ChartObjects("Chart 1").SeriesCollection(3).Value = Sheet1.Range("$CF$17:$CF$" & i) Sheet6.ChartObjects("Chart 1").SeriesCollection(3).XValues = Sheet1.Range("$I$17:$I$" & i) Thanks in advance for the assistance. |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Updating Series Data for chart based on variable.
Never mind, I figured it out myself.
The code: SeriesCollection(1).Value should have said: SeriesCollection(1).Values "Kurt Barr" wrote: I'm trying to have VBA change the ranges for a chart based on the last row in a set of data. The row number has been set to "i". I already have Dim i as long at the beginning of my macro My code looks like this: Sheet6.ChartObjects("Chart 1").Activate With ActiveChart .SeriesCollection(1).Value = Sheet1.Range("$CH$17:$CH$" & i) .SeriesCollection(1).XValues = Sheet1.Range("$I$17:$I$" & i) .SeriesCollection(2).Value = Sheet1.Range("$CG$17:$CG$" & i) .SeriesCollection(2).XValues = Sheet1.Range("$I$17:$I$" & i) .SeriesCollection(3).Value = Sheet1.Range("$CF$17:$CF$" & i) .SeriesCollection(3).XValues = Sheet1.Range("$I$17:$I$" & i) End With I've also tried to do it like this: Sheet6.ChartObjects("Chart 1").SeriesCollection(1).Value = Sheet1.Range("$CH$17:$CH$" & i) Sheet6.ChartObjects("Chart 1").SeriesCollection(1).XValues = Sheet1.Range("$I$17:$I$" & i) Sheet6.ChartObjects("Chart 1").SeriesCollection(2).Value = Sheet1.Range("$CG$17:$CG$" & i) Sheet6.ChartObjects("Chart 1").SeriesCollection(2).XValues = Sheet1.Range("$I$17:$I$" & i) Sheet6.ChartObjects("Chart 1").SeriesCollection(3).Value = Sheet1.Range("$CF$17:$CF$" & i) Sheet6.ChartObjects("Chart 1").SeriesCollection(3).XValues = Sheet1.Range("$I$17:$I$" & i) Thanks in advance for the assistance. |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| adding a data series to a chart with variable inputs. | Excel Programming | |||
| How to create 3 axes chart based on three series of data | Charts and Charting in Excel | |||
| stop chart series from updating | Charts and Charting in Excel | |||
| updating a chart series automatically | Excel Programming | |||
| need help updating chart (series in dynamic range) | Charts and Charting in Excel | |||
Linear Mode
