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

[kulbank]

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 :

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

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]

Re : Taille de marqueurs d'un graphe en VBA

Bonjour.
Essayez comme ça :

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

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

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]

Re : Taille de marqueurs d'un graphe en VBA

Bonjour,

Comme ça ?

edit : bonjour Dranreb

 

[kulbank]

Re : Taille de marqueurs d'un graphe en VBA

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