Conjunto peso linha para todas as séries em gráfico pivô

Question

Eu tentei olhar ao redor todas as opções de gráfico, mas eu não consigo encontrar uma maneira de definir a largura da linha da série de gráfico uma vez por todas. Claro, eu poderia executar um macro cada vez que a selecção série no gráfico de pivô é alterado, mas eu estou esperando há uma maneira mais simples ...

Answer 1

Aqui está a solução atual (lenta, hacky) - A "CustomChart" módulo de classe:

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

e esse trecho no topo de qualquer módulo:

Dim myChart As New customChart

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