Schaal grafieken

[Boerman]

Ik heb nu 1 grafiek waarbij de schaal automatisch wordt berekend. Nu wil ik voor een andere grafiek dezeflde schaal hanteren, maar dit krijg ik niet voor elkaar.


Hoe kan ik voor elkaar krijgen? Of is het mogelijk middels een koppeling of iets dergelijks dezelfde schaal voor de grafiek te krijgen?

 

[Boerman]

Bekijk bijlage Book1 (version 1).xls

In de bijlage zijn 2 grafieken opgenomen waarvan ik zou willen dat ze dezelfde schaal krijgen.

Alleen hoe kan ik dit realiseren?

 

[huijb]

Mod edit: Mijn fout. topic is weer open.

 

[crash]

Status aangepast naar niet opgelost, echter kan de topicstarter dit ook zelf bij zijn of haar eigen topic doen.

 

[huijb]

echter kan de topicstarter dit ook zelf bij zijn of haar eigen topic doen.

Om het educatieve had ik dit ook gemaild.

 

[WHER]

Kijk eens of de bijlage iets is waar je mee verder kan.

 

[wampier]

Volgens mij ondersteund ChartObjects "item". dus dan werkt:

ChartObjects.Item("chart 8")
of
ChartObjects("chart 8")

with ChartObjects("chart 8").Chart.Axes(xlValue, xlPrimary)

scheeld ook weer geknipper indien de charts op een andere sheet staan
Doet overigens niets af aan de oplossing, die prima is :thumb:

 

[WHER]

Dus de code kan ingekort worden tot:

Sub tst3()
 With ChartObjects("chart 8").Chart.Axes(xlValue, xlPrimary)
 .MaximumScale = ChartObjects("chart 7").Chart.Axes(xlValue, xlPrimary).MaximumScale
 .MinimumScale = ChartObjects("chart 7").Chart.Axes(xlValue, xlPrimary).MinimumScale
 End With
End Sub

 

[huijb]

@Marloes: Graag een eigen vraag maken a.u.b. Het is niet netjes om in een ander zijn of haar vraag jouw probleem aan de orde te stellen. Bovendien is het verwarrend voor de helpers en de oorspronkelijke vragensteller.

 

[Marloes1998]

iedereen bedankt voor de reactie. Ik ga er mee aan de slag.


Marloes