If I create a simple column chart of this data, with the Data Range series in "Rows" (Note that the "numbers" in the # column were entered as Text values using the ' in front of them to avoid the chart thinking it's another data series):
# Jan Feb
1 10 20
2 30 40
3 50 60
Is there any way to have Excel allow you to put the Legend Key Label desriptions (in this case the "1", "2" and "3") on top of each column bar instead of just the Legend Key items (the colored boxes) itself? In other words, the bar for Jan AND the one for Feb representing row #1 data should each have a "1" on top of the bar (or underneath would work too), etc...
For the Data Labels, it lets you "Show Values", or "Show Label", or include "Legend Key next to Label", but none of that will result in each bar having the description "1", "2", "3" on top of it. What they needed was another check box for "Legend Key Description next to Label".
Here's the code for creating the chart if the data is in range A3:C6:
Range("A3:C6").Select
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData Source:=Sheets _
("Sheet1").Range("A3:C6"), PlotBy:=xlRows
ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"
ActiveChart.ApplyDataLabels Type:=xlDataLabelsShowLabel, LegendKey:=True
The only available DataLabel types were:
"BubbleSizes", "Label", "LabelandPercent", "None", "Percent", or "Value".
Can anyone think of a way to automate the process of sequentially numbering the bars in a Column chart, or have VBA stick them in on top of each bar somehow as a work-around?
Am I missing something simple? I do NOT want to have to add them manually using Text Boxes! Thanks for any suggestions! This is a really valuable forum!
--Ray
# Jan Feb
1 10 20
2 30 40
3 50 60
Is there any way to have Excel allow you to put the Legend Key Label desriptions (in this case the "1", "2" and "3") on top of each column bar instead of just the Legend Key items (the colored boxes) itself? In other words, the bar for Jan AND the one for Feb representing row #1 data should each have a "1" on top of the bar (or underneath would work too), etc...
For the Data Labels, it lets you "Show Values", or "Show Label", or include "Legend Key next to Label", but none of that will result in each bar having the description "1", "2", "3" on top of it. What they needed was another check box for "Legend Key Description next to Label".
Here's the code for creating the chart if the data is in range A3:C6:
Range("A3:C6").Select
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData Source:=Sheets _
("Sheet1").Range("A3:C6"), PlotBy:=xlRows
ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"
ActiveChart.ApplyDataLabels Type:=xlDataLabelsShowLabel, LegendKey:=True
The only available DataLabel types were:
"BubbleSizes", "Label", "LabelandPercent", "None", "Percent", or "Value".
Can anyone think of a way to automate the process of sequentially numbering the bars in a Column chart, or have VBA stick them in on top of each bar somehow as a work-around?
Am I missing something simple? I do NOT want to have to add them manually using Text Boxes! Thanks for any suggestions! This is a really valuable forum!
--Ray