sorting date for a simple pie chart

[jayneinaccounts]

Hi

I have a very simple pie chart in one of my workbooks. It is based on data 50columns by 2rows, meaning I have 50 labels/segments of pie. What I wanted the chart to do was to sort the data from largest to smallest before it creates the pie, without having to manually sort the data first. Is this possible?

Any advice would be greatly appreciated.

 

[jayneinaccounts]

bump!

 

[RoryA]

The best advice I can give you is to not use a pie chart if you have that many pieces of data, as it will be meaningless. You would almost certainly be far better off with a bar chart.
For the sort, you could use an additional table using the LARGE function:
=LARGE(datarange, 1)
=LARGE(datarange, 2)
and so on, to sort in descending order.

 

[VoG]

Maybe like this

Sub APie()
Range("A1:B50").Sort Key1:=Range("B1"), Order1:=xlAscending, _
        Header:=xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
With ActiveSheet.ChartObjects.Add(Left:=100, Width:=375, Top:=75, Height:=225)
    .Chart.SetSourceData Source:=Range("A1:B50")
    .Chart.ChartType = xlPie
End With
End Sub