Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.charting
|
|||
|
|||
Change default settings for surface chart legend
I am creating surface charts containing a lot of data and I'm using a colour
scheme imported from another spreadsheet that looks nice and pretty and fades from dark green up through yellows, oranges and reds towards the higher values. It looks great when there are no borders on the legend entries, but this always appears to be the default setting, and with borders on my chart is more black lines than pretty colours. Its a real pain to select each of about 20 legend entries in turn and remove the borders, especially as I am creating lots of charts. Is there a quick way (macro?) of getting rid of the borders, or a way to change the default setting??? |
#2
Posted to microsoft.public.excel.charting
|
|||
|
|||
Change default settings for surface chart legend
With a little help from the macro recorder.
Sub RemoveSurfaceBorders() Dim objLE As LegendEntry Application.ScreenUpdating = False With ActiveChart For Each objLE In ActiveChart.Legend.LegendEntries objLE.LegendKey.Border.LineStyle = xlNone Next End With Application.ScreenUpdating = True End Sub Cheers Andy rmellison wrote: I am creating surface charts containing a lot of data and I'm using a colour scheme imported from another spreadsheet that looks nice and pretty and fades from dark green up through yellows, oranges and reds towards the higher values. It looks great when there are no borders on the legend entries, but this always appears to be the default setting, and with borders on my chart is more black lines than pretty colours. Its a real pain to select each of about 20 legend entries in turn and remove the borders, especially as I am creating lots of charts. Is there a quick way (macro?) of getting rid of the borders, or a way to change the default setting??? -- Andy Pope, Microsoft MVP - Excel http://www.andypope.info |
#3
Posted to microsoft.public.excel.charting
|
|||
|
|||
Change default settings for surface chart legend
Thanks again Andy!
"Andy Pope" wrote: With a little help from the macro recorder. Sub RemoveSurfaceBorders() Dim objLE As LegendEntry Application.ScreenUpdating = False With ActiveChart For Each objLE In ActiveChart.Legend.LegendEntries objLE.LegendKey.Border.LineStyle = xlNone Next End With Application.ScreenUpdating = True End Sub Cheers Andy rmellison wrote: I am creating surface charts containing a lot of data and I'm using a colour scheme imported from another spreadsheet that looks nice and pretty and fades from dark green up through yellows, oranges and reds towards the higher values. It looks great when there are no borders on the legend entries, but this always appears to be the default setting, and with borders on my chart is more black lines than pretty colours. Its a real pain to select each of about 20 legend entries in turn and remove the borders, especially as I am creating lots of charts. Is there a quick way (macro?) of getting rid of the borders, or a way to change the default setting??? -- Andy Pope, Microsoft MVP - Excel http://www.andypope.info |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macro to change Chart Range when inserting a column | Charts and Charting in Excel | |||
Why Does Date Format Change on Chart | Excel Discussion (Misc queries) | |||
change chart title with auto filter | Charts and Charting in Excel | |||
Setting and KEEPING the default chart | Charts and Charting in Excel | |||
How do I change the default settings in charts? | Charts and Charting in Excel |