Problème sur le format d'un axe de graphique

Bonjour à tous,

je rencontre un problème lorsque je veux changer le format des nombres d'un de mes axes sur un graphique Je souhaite les mettre au format général soit "Standard" puisquils ne le sont pas par défauts.
Le code que j'ai écris est le suivant :

ActiveSheet.ChartObjects("Graphique 1").Activate
ActiveChart.PlotArea.Select
ActiveChart.Axes(xlCategory).Select
    With ActiveChart.Axes(xlCategory)
        .MinimumScale = 2.75
        .MaximumScale = 4
        .MinorUnitIsAuto = True
        .MajorUnitIsAuto = True
        .Crosses = xlAutomatic
        .ReversePlotOrder = False
        .ScaleType = xlLinear
        .DisplayUnit = xlNone
    End With
Selection.TickLabels.NumberFormat = "Standard"

La ligne qui génère l'erreur est la dernière et m'affiche "Erreur définie par l'application ou par l'objet"

Merci d'avance à tous ceux qui prendront le temps de me répondre !