Variable dans graphique macro
Résolu
Bonjour,
je cherche à changer une case de sélection en fonction d'une variable i par exemple :
For i = 0 To 15
ActiveChart.SeriesCollection(3).Points(i + 1).DataLabel.Select
Selection.Formula = "=feuill1!$B$(40+i)"
Next
Comment puis je faire ?
Merci d'avance
je cherche à changer une case de sélection en fonction d'une variable i par exemple :
For i = 0 To 15
ActiveChart.SeriesCollection(3).Points(i + 1).DataLabel.Select
Selection.Formula = "=feuill1!$B$(40+i)"
Next
Comment puis je faire ?
Merci d'avance
3 réponses
-
Je ne crois pas !
1. On récupère le texte de l'étiquette dans Feuil1
eti=Sheets("Feuil1").Range("B" & 40+i)
2. On met ce texte sur le point du graphique
ActiveChart.SeriesCollection(3).Points(i+1).DataLabel.Characters.Text = eti
voir le fichier exemple
Cdlmnt -
Salut Victor
J'ai modifié ma proposition (que j'avais tapé à la volée) et bricolé un fichier en exemple pour que ce soit plus simple à adapter
Cdlmnt -
Bonjour
Essaies ceci dans ta boucle For i ....
eti=Sheets("Feuil1").Range("B" & 40+i)
ActiveChart.SeriesCollection(3).Points(i+1).DataLabel.Characters.Text = eti
Un exemple
http://www.cjoint.com/c/GGlpMNghMGB
Cdlmnt
