Hi,
You can create a simple report layout with two 2DAxisSystems.
After changing the first axis range run this script:
Dim oRefAxis, oSecAxis
if Report.ActiveSheet.Objects.Exists("2DAxis1") and Report.ActiveSheet.Objects.Exists("2DAxis2") then
set oRefAxis = Report.ActiveSheet.Objects("2DAxis1").XAxis
set oSecAxis = Report.ActiveSheet.Objects("2DAxis2").XAxis
oSecAxis.Scaling.AutoScalingType = eAxisAutoScalingBeginEndManual
oSecAxis.Scaling.Begin = oRefAxis.Scaling.Begin
oSecAxis.Scaling.End = oRefAxis.Scaling.End
call Report.Refresh()
end if
You can configure the script to run when pressing an F button. Use the report script function group for that. Then its just one click to adapt the secondary axis range to the leading axis range.
Christian
CLA, CTA, CLED