Minimum Question
Posted: Thu Jan 06, 2005 10:27 pm
I have 2 series on my graph and would like to use a number other than 0 as my minimum value. Series 1 is a bar on the left axis and Series 2 is a line graph on the right axis. Here is what I am currently trying to do this.
Chart.axis.left.automatic = False
Chart.axis.left.minimum = 80
Chart.axis.left.maximum = 120
The values are 99.4, 99.5, 99.6, 99.8.
Here is my code leading up to my series.add loop.
'On Line
Chart.Legend.Visible=False
Chart.Height=161
Chart.Width=540
'Bottom Axis
Chart.Axis.Bottom.Title.Font.Bold=True
Chart.Axis.Bottom.Title.Font.Name = "Tahoma"
Chart.Axis.Bottom.Title.Font.Size = 8
Chart.Axis.Bottom.GridPen.Visible = False
Chart.Axis.Bottom.Title.Caption = "Sale"
'Left Axis
Chart.Axis.Left.Title.Font.Bold=True
Chart.Axis.Left.Title.Font.Name = "Tahoma"
Chart.Axis.Left.Title.Font.Size = 8
Chart.Axis.Left.GridPen.Style = psSolid
Chart.Axis.Left.AxisPen.Color = RGB(179, 179, 179)
Chart.Axis.Left.Title.Caption = session("reportHeading")
Chart.axis.Left.automatic = False
Chart.axis.left.minimum = 80
Chart.axis.left.maximum = 120
'Right Axis
Chart.Axis.Right.Title.Font.Bold=True
Chart.Axis.Right.Title.Font.Color = RGB (255, 102, 0)
Chart.Axis.Right.Title.Font.Name = "Tahoma"
Chart.Axis.Right.Title.Font.Size = 8
Chart.Axis.Right.Title.Caption = "Sale Price"
Chart.Axis.right.GridPen.Visible = False
'Panels
Chart.Panel.Color=RGB(255, 255, 255)
Chart.Panel.MarginBottom = 0
Chart.Panel.MarginTop = 5
Chart.Panel.MarginLeft = 2
Chart.Panel.MarginRight = 2
Chart.Panel.BevelWidth = 0
Chart.Walls.visible = true
Chart.header.visible = false
Chart.Aspect.View3D = False
Chart.Frame.Visible = False
'Chart.Series(0).Clear
Chart.AddSeries(scBar)
Chart.Series(0).Title = ""
Chart.Series(0).Marks.Visible=False
Chart.series(0).VerticalAxis = aLeftAxis
Chart.series(0).asBar.barpen.style = 0
'Chart.Series(1).Clear
Chart.AddSeries(scLine)
Chart.Series(1).Title = ""
Chart.Series(1).Marks.Visible=False
Chart.series(1).VerticalAxis = aRightAxis
Chart.series(1).asline.stairs = false
Chart.series(1).asline.linepen.width = 2
Chart.series(1).asLine.pointer.visible = true
Chart.series(1).asLine.pointer.style = 1
Please let me know if you can help. Thank you.
Rob Novosel
Chart.axis.left.automatic = False
Chart.axis.left.minimum = 80
Chart.axis.left.maximum = 120
The values are 99.4, 99.5, 99.6, 99.8.
Here is my code leading up to my series.add loop.
'On Line
Chart.Legend.Visible=False
Chart.Height=161
Chart.Width=540
'Bottom Axis
Chart.Axis.Bottom.Title.Font.Bold=True
Chart.Axis.Bottom.Title.Font.Name = "Tahoma"
Chart.Axis.Bottom.Title.Font.Size = 8
Chart.Axis.Bottom.GridPen.Visible = False
Chart.Axis.Bottom.Title.Caption = "Sale"
'Left Axis
Chart.Axis.Left.Title.Font.Bold=True
Chart.Axis.Left.Title.Font.Name = "Tahoma"
Chart.Axis.Left.Title.Font.Size = 8
Chart.Axis.Left.GridPen.Style = psSolid
Chart.Axis.Left.AxisPen.Color = RGB(179, 179, 179)
Chart.Axis.Left.Title.Caption = session("reportHeading")
Chart.axis.Left.automatic = False
Chart.axis.left.minimum = 80
Chart.axis.left.maximum = 120
'Right Axis
Chart.Axis.Right.Title.Font.Bold=True
Chart.Axis.Right.Title.Font.Color = RGB (255, 102, 0)
Chart.Axis.Right.Title.Font.Name = "Tahoma"
Chart.Axis.Right.Title.Font.Size = 8
Chart.Axis.Right.Title.Caption = "Sale Price"
Chart.Axis.right.GridPen.Visible = False
'Panels
Chart.Panel.Color=RGB(255, 255, 255)
Chart.Panel.MarginBottom = 0
Chart.Panel.MarginTop = 5
Chart.Panel.MarginLeft = 2
Chart.Panel.MarginRight = 2
Chart.Panel.BevelWidth = 0
Chart.Walls.visible = true
Chart.header.visible = false
Chart.Aspect.View3D = False
Chart.Frame.Visible = False
'Chart.Series(0).Clear
Chart.AddSeries(scBar)
Chart.Series(0).Title = ""
Chart.Series(0).Marks.Visible=False
Chart.series(0).VerticalAxis = aLeftAxis
Chart.series(0).asBar.barpen.style = 0
'Chart.Series(1).Clear
Chart.AddSeries(scLine)
Chart.Series(1).Title = ""
Chart.Series(1).Marks.Visible=False
Chart.series(1).VerticalAxis = aRightAxis
Chart.series(1).asline.stairs = false
Chart.series(1).asline.linepen.width = 2
Chart.series(1).asLine.pointer.visible = true
Chart.series(1).asLine.pointer.style = 1
Please let me know if you can help. Thank you.
Rob Novosel