View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.charting
Hans Hamm Hans Hamm is offline
external usenet poster
 
Posts: 41
Default Odd Chart Format Results

I have two sheets with charts on both... Sheet1 and all it's charts are dead on.
However, when I copied the code from Sheet1 to Sheet6 I am getting "odd things" happening.
The Chart(s) are repeated 5 times using different data represented by the "Range("A"...." line of code

Here is the opening code:
With Sheet6
.Shapes.AddChart.Select
ActiveChart.ChartType = xlCylinderBarClustered
ActiveChart.SetSourceData Source:=Range("A" & lFirstRow & ":B" & lLastRow)
End With

I should be getting just a basic Cylinder Bar Chart. The first chart comes out correctly formatted based on the code(all the Cylinders are the same color, the series are correct etc...)=SERIES(Sheet6!$B$248,Sheet6!$A$249:$A$278, Sheet6!$B$249:$B$278,1)
but the other four charts =SERIES(Sheet6!$A$198,,Sheet6!$B$198,1) are giving me individual horizontal series as well as coloring the cylinders different colors.
I cannot figure out why I am getting two different results.
Any ideas would be appreciated!