[Macro] Modifier la plage de donnée d'un graphique

Dans cette FAQ
http://openoffice-libreoffice.develo...r-un-graphique

Pour moi, la méthode pour modifier la plage source n'existe pas (ou plus : LO ou OP ?)

Citation:

---

'Spécifie la nouvelle plage de données source
oChart.ChartRangeAddress = "Feuille1.$A$1:.$B25"

---

J'ai trouvé le champ UsedRangeRepresentations dans lequel est stocké en tableau, les entêtes et plage de données.

Code:

---

oChart.UsedRangeRepresentations

---

Le souci c'est que je n'arrive pas à écrire dans ce champ..

Y a t-il une méthode que j'ai loupé ?

Enfin compris :

Mes données était videz, je ne sais pourquoi, donc :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Dim ch As Object, lesZones As Variant, adrZ As Object maFeuille = ThisComponent.Sheets.getByPosition(2) ' on suppose que la feuille comporte un seul diagramme ! lesZones = maFeuille.Charts(0).Ranges   ' Si la zone n'est pas vide on la modifie If UBound(lesZones) >= 0 Then adrZ = lesZones(0) ' dans cet exemple on a une seule zone adrZ.StartRow = 0 adrZ.StartColumn = 3 adrZ.EndRow = 12 ' réduire la zone adrZ.EndColumn = 58 lesZones(0) = adrZ fTCD.Charts(0).Ranges = lesZones() Else 'Sinon on la créée LaZone = maFeuille.getCellRangeByPosition(0, 3, 12, 58) maFeuille.Charts(0).setRanges( Array(LaZone.getRangeAddress()) ) EndIf

---