[VB/VBA/VBS] Sélection d'une partie des graphiques d'une feuille

Marsh Posté le 12-11-2014 à 06:56:07

Bonjour à tous,

Malgré de nombreuses recherches sur internet, je ne trouve pas de solutions à mon problème :
sur une feuille j'ai 100 graphiques réparti sur 6 colonnes. Dans une autre feuille, j'ai 1 tableau de donnée qui doit me servir pour rajouter une série sur tous les graphiques d'une colonne (colonne T). J'ai réalisé ce code :

Code :

Sub SoftmaMacro()
Dim ws As Excel.Worksheet
Dim wk As Excel.Worksheet
Dim cht As Chart
Dim cho As ChartObject
Set ws = Sheets("2 Database" )
Set wk = Sheets("1 Input" )
For Each cho In ws.ChartObjects
cho.Activate
With ActiveChart
.SeriesCollection.NewSeries 'Ajoute une série
With .SeriesCollection(.SeriesCollection.Count)
.Name = c 'Nom de la série
.XValues = "='1 Input'!$A$6:$A$710"
.Values = "='1 Input'!$B$6:$B$710"
End With
End With
Next
End Sub

J'active tous les graphiques de la page, donc la nouvelle courbe apparaitra dans tous les graphiques. Ce que je voudrai c'est Activer une seule colonne, mais pas moyen d'y arriver (quand je définis mon for each cho, je n'arrive pas a faire pointer sur une seule colonne en particulier; j'ai essayé quelques boucles ça n'a jamais fonctionné). Est ce que vous auriez des idées ?

Merci d'avance pour votre aide

Marsh Posté le 12-11-2014 à 06:56:07

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *