Discussion :

[juju05]

Bonjour,

Je souhaite redimensionner la taille de la fenêtre contenant mes histogrammes en fonction du "nombre de barres" par vba. Je n'ai pas trouvé comment faire après de multiples recherches.

Je ne souhaite pas mettre de nom aux séries sur mon histogramme.
Même en positionnant le code ci-dessous, un carré précisant la série s'affiche

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
With .SeriesCollection(1)
           .name = ""        
        End With

Il s'agit de l'histogramme "Taux de service fournisseur" présent en haut à droite de la feuille "Cotation" du classeur ci-joint.

[mercatog]

A adapter

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub EnleveAxeEtLegend()
 
With Feuil1.ChartObjects("Graphique 12").Chart 'Adapter avec le nom de l'objet graphique
    .Axes(xlCategory).Delete
    .HasLegend = False
End With
End Sub