Using Windows 7
Office Excel 2010
I'm trying to add a reverse order for the axis for a chart that populates based on various data.* Because of this, some (NOT ALL)*of the charts need to have the reverse order = False.*
I have*tried adding*the statement (.Axes(xlValue).ReversePlotOrder = False)*in various combinations, but nothing works.* Any suggestions?
Option Explicit
Public Chart1 As New ParetoChartClass
Public Chart2 As New TrendChartClass
Sub Set_Drill_Down_Ranges()
Set rnga2 = Sheets("DRILL DOWN DATA").Range("A2")
Set rngb2 = Sheets("DRILL DOWN DATA").Range("B2")
Set rngb3 = Sheets("DRILL DOWN DATA").Range("B3")
Set rngb5 = Sheets("DRILL DOWN DATA").Range("B5")
Set rngc2 = Sheets("DRILL DOWN DATA").Range("C2")
Set rngc3 = Sheets("DRILL DOWN DATA").Range("C3")
Set rngc5 = Sheets("DRILL DOWN DATA").Range("C5")
Set rngd1 = Sheets("DRILL DOWN DATA").Range("D1")
Set rngd3 = Sheets("DRILL DOWN DATA").Range("D3")
Set rngd5 = Sheets("DRILL DOWN DATA").Range("D5")
Set rnge3 = Sheets("DRILL DOWN DATA").Range("E3")
Set rnge5 = Sheets("DRILL DOWN DATA").Range("E5")
Set rngf2 = Sheets("DRILL DOWN DATA").Range("F2")
Set rngf3 = Sheets("DRILL DOWN DATA").Range("F3")
Set rngf5 = Sheets("DRILL DOWN DATA").Range("F5")
Set rngg5 = Sheets("DRILL DOWN DATA").Range("G5")
Set rngh3 = Sheets("DRILL DOWN DATA").Range("H3")
Set rngh5 = Sheets("DRILL DOWN DATA").Range("H5")
***
End Sub
Sub Drill_Down_FIFT()
*
*** rngh3 = "FIFT %"
*** Get_Trend_Data1
*** Get_Pareto_Data1
*** Sheets("CHARTS").ChartObjects("Chart 3").Chart.SeriesCollection(1).DataLabels.NumberFormat = "0.0%"***
*** Reset_Drill_Down_Selection_Buttons1
***
End Sub
Bookmarks