Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Apply different color to datalabels
I have a code that adds series to a chart.
I want to set the Datalabel.Interior.ColorIndex, but for some reason the ClorIndex is not applyed to the DataLabel.. Any suggestion on why? Or how can i do this? My current code includes: With Sheets("Chart").SeriesCollection.NewSeries .Name = Name .XValues = XValue .Values = YValue .MarkerSize = 5 .ApplyDataLabels .DataLabels.Interior.Pattern = xlSolid .DataLabels.Interior.ColorIndex = C .DataLabels.Border.ColorIndex = 1 .DataLabels.Font.Size = 7 .DataLabels.Position = xlCenter .DataLabels.Orientation = 45 .DataLabels.ShowSeriesName = True .DataLabels.ShowValue = False End With (where C is set to a valid value using a Select Case loop.) |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Apply different color to datalabels
Your code works fine for me in 2003/2007, subject of course assigning a
value for C of between 1-56 or xlAutomatic/xlNone FWIW if only using 2007/2010, although the code will work there is a new preferred method of applying formats to interiors. Regards, Peter T "TG" wrote in message ... I have a code that adds series to a chart. I want to set the Datalabel.Interior.ColorIndex, but for some reason the ClorIndex is not applyed to the DataLabel.. Any suggestion on why? Or how can i do this? My current code includes: With Sheets("Chart").SeriesCollection.NewSeries .Name = Name .XValues = XValue .Values = YValue .MarkerSize = 5 .ApplyDataLabels .DataLabels.Interior.Pattern = xlSolid .DataLabels.Interior.ColorIndex = C .DataLabels.Border.ColorIndex = 1 .DataLabels.Font.Size = 7 .DataLabels.Position = xlCenter .DataLabels.Orientation = 45 .DataLabels.ShowSeriesName = True .DataLabels.ShowValue = False End With (where C is set to a valid value using a Select Case loop.) |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Apply different color to datalabels
I'm using Excel 2010, but I can't get this code to work...
Regardless, what value er set, the interior color stays as 'white'.. ;- ( What is the correct way to set interior for excel 2010?? On 25 Maj, 17:48, "Peter T" wrote: Your code works fine for me in 2003/2007, subject of course assigning a value for C of between 1-56 or xlAutomatic/xlNone FWIW if only using 2007/2010, although the code will work there is a new preferred method of applying formats to interiors. Regards, Peter T "TG" wrote in message ... I have a code that adds series to a chart. I want to set the Datalabel.Interior.ColorIndex, but for some reason the ClorIndex is not applyed to the DataLabel.. Any suggestion on why? Or how can i do this? My current code includes: * * * * * *With Sheets("Chart").SeriesCollection.NewSeries * * * * * * * *.Name = Name * * * * * * * *.XValues = XValue * * * * * * * *.Values = YValue * * * * * * * *.MarkerSize = 5 * * * * * * * *.ApplyDataLabels * * * * * * * *.DataLabels.Interior.Pattern = xlSolid * * * * * * * *.DataLabels.Interior.ColorIndex = C * * * * * * * *.DataLabels.Border.ColorIndex = 1 * * * * * * * *.DataLabels.Font.Size = 7 * * * * * * * *.DataLabels.Position = xlCenter * * * * * * * *.DataLabels.Orientation = 45 * * * * * * * *.DataLabels.ShowSeriesName = True * * * * * * * *.DataLabels.ShowValue = False * * * * * *End With (where C is set to a valid value using a Select Case loop.) |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Apply different color to datalabels
Your code also works fine in 2010, but as I mentioned before only if an
appropriate value is first assigned to C (the colorindex) If only using 2007/2010 instead you could do something like ..DataLabels.Format.Fill.ForeColor.RGB = RGB(150,150,250) or instead of .RGB apply SchemeColor and maybe TintAndShade Regards, Peter T "TG" wrote in message ... I'm using Excel 2010, but I can't get this code to work... Regardless, what value er set, the interior color stays as 'white'.. ;- ( What is the correct way to set interior for excel 2010?? On 25 Maj, 17:48, "Peter T" wrote: Your code works fine for me in 2003/2007, subject of course assigning a value for C of between 1-56 or xlAutomatic/xlNone FWIW if only using 2007/2010, although the code will work there is a new preferred method of applying formats to interiors. Regards, Peter T "TG" wrote in message ... I have a code that adds series to a chart. I want to set the Datalabel.Interior.ColorIndex, but for some reason the ClorIndex is not applyed to the DataLabel.. Any suggestion on why? Or how can i do this? My current code includes: With Sheets("Chart").SeriesCollection.NewSeries .Name = Name .XValues = XValue .Values = YValue .MarkerSize = 5 .ApplyDataLabels .DataLabels.Interior.Pattern = xlSolid .DataLabels.Interior.ColorIndex = C .DataLabels.Border.ColorIndex = 1 .DataLabels.Font.Size = 7 .DataLabels.Position = xlCenter .DataLabels.Orientation = 45 .DataLabels.ShowSeriesName = True .DataLabels.ShowValue = False End With (where C is set to a valid value using a Select Case loop.) |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Apply different color themes to worksheets withing a workbook | Excel Discussion (Misc queries) | |||
Apply color of one cell to other | Excel Discussion (Misc queries) | |||
How to apply different color on different columns and legends easily? | Charts and Charting in Excel | |||
HOW CAN I APPLY A COLOR TO ENTIRE ROW USING CONDITIONAL FORMATT | Excel Worksheet Functions | |||
How do I apply color in cells ..color now shown only in print prev | Excel Worksheet Functions |