我有 3 个数据透视图,它们由一个切片器控制,切片器会更改周结束日期。图表上的主轴上有“展示次数”,副轴上有“点击次数”。
我希望当切片器更改时,次轴的刻度能够自动调整,以便它始终等于主轴的 2%。这样,当次线位于主线上方时,我就知道我们已经达到了目标。
有人知道如何实现这一点吗?
答案1
我使用 VBA 和工作表更改功能解决了这个问题
Private Sub Worksheet_Change(ByVal Target As Range)
Dim x As Long
With ActiveSheet.ChartObjects("Chart 1").Chart
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.Axes(xlValue).MaximumScaleIsAuto = True
ActiveChart.Axes(xlValue).MinimumScale = 0
x = ActiveChart.Axes(xlValue).MaximumScale
ActiveChart.Axes(xlValue, xlSecondary).MaximumScale = (x * 0.02)
End With
End Sub