D
dave
In access I am trying to go through a series of charts which are
embedded in a form. With the selection of a new record in the form, new
data is shown in the chart. This works. However the minimum value seems
set at 0 in all of the forms. I would like to set a variable for each
record in the form for the minimum x axis value. Then when I activate
the next page of the form, have it set the minimum value to my variable.
I can do this in Excel with the script:
ActiveWindow.Visible = False
Windows("test file.xls").Activate
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.ChartArea.Select
ActiveChart.Axes(xlValue).Select
With ActiveChart.Axes(xlValue)
MinimumScale = 0.031
MaximumScaleIsAuto = True
MinorUnitIsAuto = True
MajorUnitIsAuto = True
Crosses = xlAutomatic
ReversePlotOrder = False
ScaleType = xlLinear
DisplayUnit = xlNone
End With
ActiveWindow.Visible = False
Windows("test file.xls").Activate
However, I am having a hard time getting this to work in access.
embedded in a form. With the selection of a new record in the form, new
data is shown in the chart. This works. However the minimum value seems
set at 0 in all of the forms. I would like to set a variable for each
record in the form for the minimum x axis value. Then when I activate
the next page of the form, have it set the minimum value to my variable.
I can do this in Excel with the script:
ActiveWindow.Visible = False
Windows("test file.xls").Activate
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.ChartArea.Select
ActiveChart.Axes(xlValue).Select
With ActiveChart.Axes(xlValue)
MinimumScale = 0.031
MaximumScaleIsAuto = True
MinorUnitIsAuto = True
MajorUnitIsAuto = True
Crosses = xlAutomatic
ReversePlotOrder = False
ScaleType = xlLinear
DisplayUnit = xlNone
End With
ActiveWindow.Visible = False
Windows("test file.xls").Activate
However, I am having a hard time getting this to work in access.