Eu encontrei o código a seguir (nos documentos do office) que me permite altere a cor do eixo de um grupo de minigráficos:
Sub AxisColor()
'The sparkline group
Dim oSparkGroup As SparklineGroup
'Loop through the sparkline groups on the sheet
For Each oSparkGroup In Range("A2:C2").SparklineGroups
'Show the axis
oSparkGroup.Axes.Horizontal.Axis.Visible = True
'Set the color of the axis to the color of cell A8
oSparkGroup.Axes.Horizontal.Axis.Color.Color = Range("A8").Interior.Color
Next oSparkGroup
End Sub
No entanto, eu tenho um (único) grupo de 60 minigráficos e o eixo vai estar acima ou abaixo da linha (difere caso a caso). Eu quero ter diferentes cores para um eixo que está acima de todos os dados (ou seja, um máximo) e para um eixo que está abaixo de todos os dados (ou seja, um min). Isso é possível?
Eu suspeito que eu possa precisar quebrar o grupo sparkline em 60 grupos individuais. Se alguém puder me mostrar como fazer isso (via VBA ou outra forma), então eu posso facilmente adaptar o código acima para os meus propósitos.