Modifier la police d'un axe d'un graphique Excel [Résolu]

[NooD]

Bonjour,

Je suis à la recherche de la propriété qui définie la taille de la police d'un axe d'un graphique Excel.

Je précise, le graphique est créé en VBA.

Voici la partie du code concerné :

Code :

1
2
3
4
5
6
7
8
9
10
11
With aChart.Axes(xlCategory)
            .ReversePlotOrder = True
            .TickLabelSpacing = 1
            .TickMarkSpacing = 1
            .AxisBetweenCategories = True
            If (nbResult > 19) Then
                DoEvents
            Else
                If (nbResult > 9) Then DoEvents
            End If
        End With

J'aimerais remplaer DoEvents par la bonne propriété.

Merci d'avance.

Bonne journée.

[SilkyRoad]

bonjour

Tu peux tester

Code :

1
2
3
4
5
6
7
8
9
10
11
With aChart.Axes(xlCategory)
    .ReversePlotOrder = True
    .TickLabelSpacing = 1
    .TickMarkSpacing = 1
    .AxisBetweenCategories = True
    If (nbResult > 19) Then
        .TickLabels.Font.Size = 8
        Else
        If (nbResult > 9) Then .TickLabels.Font.Size = 16
    End If
End With

bonne soirée
michel

[NooD]

Bonjour,

C'est impec' !

Merci pour votre aide

Bonne journée.