VBAアクセスピボットグラフはY軸の最小/最大スケールを設定します

Question

Access 2010のVBAを使用してピボットグラフを構成する別の問題になっています。「実行時エラー '438」が表示されます。メソッドエラーです。

もう一度、コードのさまざまな反復を試みましたが、正しいコードを得ることはできません。いつものように、事前にお手伝いいただきありがとうございます。

Private Sub Form_Load() 

'Call LineMarkerFormat 

RONMax = DMax("[Total A/C]", "tblRONChartComparison") 
RONMin = DMin("[Total A/C]", "tblRONChartComparison") 

With Me.ChartSpace.Charts(0).Axes(1).Scaling 
    .MinimumScale = RONMin 
    .MaximumScale = RONMax 

End With 

End Sub 

Answer 1

非常に簡単な解決策がありました。 .minimum/.maximumの最後にスケーリングが必要なくなりました。ここに私の作業コードです。

Private Sub Form_Load() 

'Call LineMarkerFormat 

RONMax = DMax("[Total A/C]", "tblRONChartComparison") 
RONMin = DMin("[Total A/C]", "tblRONChartComparison") 


With Me.ChartSpace.Charts(0).Axes(1).Scaling 
    .Minimum = RONMin 
    .Maximum = RONMax 

End With 

End Sub