[Résolu] Taille de marqueurs d'un graphe en VBA

kulbank · 1 Mars 2014

Salut le forum,
J'aimerais modifier la taille des marqueurs d'une série dans un graphique de nuage de points. La taille est dans une cellule de la feuille Excel. Le graphique est déjà créé mais j'aimerais qu'il se mette à jour automatiquement lorsque la cellule de la taille du marqueur change.
Je suis allé voir sur internet et dans mes bouquins mais les réponses ne m'ont pas fait avancé.
Le code le plus proche de ce que je pense être correct devrait être :

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("N6")) Is Nothing Then
Call Macro2
End If
End Sub

Code:

Sub Macro2()
Graphique1.Plot.SeriesCollection(5).SeriesMarker.Auto = False
Graphique1.Plot.SeriesCollection(5).DataPoints(-1).Marker.Size = Range("N6")
End Sub

Mais bon étant donné qu'un code presque juste fonctionne pas, je sollicite votre aide

Merci d'avance pour votre aide!!

KulbanK

Dranreb · 1 Mars 2014

Re : Taille de marqueurs d'un graphe en VBA

Bonjour.
Essayez comme ça :

VB:

Feuil1.ChartObjects("Graphique  1").Chart.SeriesCollection(5).MarkerSize = Feuil1.[N8].Value

P.S. En tout cas j'ai pu faire fonctionner ça, chez moi :

VB:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$16" Then ChartObjects("Graphique1").Chart.SeriesCollection(5).MarkerSize = Target.Value
End Sub

Edit: Bonjour Gardien de phare

Gardien de phare · 1 Mars 2014

Re : Taille de marqueurs d'un graphe en VBA

Bonjour,

Comme ça ?

edit : bonjour Dranreb

kulbank · 1 Mars 2014

Re : Taille de marqueurs d'un graphe en VBA

Yeah!! Ouais c'est exactement ça!! Merci beaucoup les gars! C'est géant!

[Résolu] Taille de marqueurs d'un graphe en VBA

kulbank

XLDnaute Nouveau

Pièces jointes

Dranreb

XLDnaute Barbatruc

Gardien de phare

XLDnaute Accro

Pièces jointes

kulbank

XLDnaute Nouveau

Discussions similaires