Problème taille font d'un graphique par macro

[Deneb]

Bonjour à tous.

J'ai fait une macro permettant de mettre à jour des graphiques d'une feuille. Voici mon code qui s'exécute après la sélection du graphique:

Sub meform()


 ActiveChart.PlotArea.Select
    ActiveChart.SeriesCollection(1).Select
    ActiveChart.Axes(xlValue).Select
    ActiveChart.Axes(xlValue).Select
    ActiveChart.Axes(xlValue).Select
    ActiveChart.PlotArea.Select
    Selection.Width = 178
    
ActiveChart.PlotArea.Select
    ActiveChart.ChartGroups(1).RadarAxisLabels.Select
    Selection.AutoScaleFont = True
    
    With Selection.Font
        .Name = "Arial"
        .FontStyle = "Normal"
        [B].Size = 6[/B]
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = xlAutomatic
        .Background = xlAutomatic
    End With
    
    ActiveWindow.Visible = False
    Windows("Nom_de_mon_fichier.xls").Activate
    
End Sub

à l'exécution j'ai un magnifique message d'erreur :

"Erreur 1004 : Impossible de définir la propriété Size de la classe Font."

(j'ai mis en gras l'endroit où ça bloque, même si vous devez vous en douter)

ça fait un petit momment que je cherche, sur le web je ne trouve pas d'erreur de ce genre avec Font...

Si vous avez des idées, suggestion, je prends tout !



Merci

 

[Deneb]

Re : Problème taille font d'un graphique par macro

Alors un petit indice qui me permet de up, lorsque je modifie manuellement la taille en 6, un message d'erreur apparait et me dit

"Nombre maximum de polices de caractères autorisées atteint pour ce classeur."

Là j'avoue que ça m'inquiète un peu ...