Problème taille font d'un graphique par macro

  • Initiateur de la discussion Initiateur de la discussion Deneb
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Deneb

XLDnaute Junior
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:

Code:
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
 
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 ...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
0
Affichages
789
Réponses
6
Affichages
1 K
Réponses
1
Affichages
908
Réponses
2
Affichages
866
Réponses
6
Affichages
2 K
Retour