excel - ピボットグラフのすべてのシリーズの線の太さを設定します

Question

すべてのグラフオプションを調べてみましたが、グラフ系列の線幅を一度に設定する方法が見つからないようです。もちろん、ピボットグラフの系列選択が変更されるたびにマクロを実行することもできますが、もっと簡単な方法があることを望んでいます...

Answer 1

現在の（遅い、ハッキーな）ソリューションは次のとおりです-「CustomChart」クラスモジュール：

Option Explicit

Public WithEvents customChart As Chart

Private Sub customChart_Calculate()
    Dim customSeries As series
    Application.ScreenUpdating = False

    For Each customSeries In customChart.SeriesCollection
        customSeries.Border.Weight = xlThick
    Next

    Application.ScreenUpdating = True
End Sub

そして、任意のモジュールの上部にあるこのスニペット:

Dim myChart As New customChart

Sub Auto_Open()
    Set myChart.customChart = Charts(1)
End Sub